#pas
program prison;
var
i:integer;
l,p:real;
begin
i:=0;
l:=1;
p:=1;
repeat
i:=i+1;
p:=p*0.95;
l:=l+p;
until l>=13;
writeln (i);
readln;
end.