Question

Население города ежегодно увеличивается на 1/40 населения состава жителей. Через сколько лет население города утроится?

Answer 1

readln(n);
n1:=3*n;
i:=0;
while n<=n1 do
   begin
n:=41/40*n;
i:=i+1;
end;
writeln(i);