// PascalABC.NET
begin
var distance:=3.0;
var sum:=3.0;
var days:=1;
repeat
distance += distance * 0.1;
sum += distance;
days += 1;
until sum > 30;
writeln(days);
end.
// PascalABC.NET
begin
var distance:=3.0;
var sum:=3.0;
var days:=1;
repeat
distance += distance * 0.1;
sum += distance;
days += 1;
until sum > 30;
writeln(days);
end.