var a:array[1..10]of integer;
height:integer;
i,total:integer;
begin
for i:=1 to 10 do read(a[i]);
readln(height);
height:=height+30;
for i:=1 to 10 do if a[i]<=height then total:=total+1;
writeln(total);
end.