Население города ежегодно увеличивается на 1/40 населения состава жителей. Через сколько лет население города утроится?
readln(n);
n1:=3*n;
i:=0;
while n<=n1 do
begin
n:=41/40*n;
i:=i+1;
end;
writeln(i);
Оцени ответ
Вход
Регистрация
Задать вопрос
readln(n);
n1:=3*n;
i:=0;
while n<=n1 do
begin
n:=41/40*n;
i:=i+1;
end;
writeln(i);