Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Население города в 2004 г. составило 80000000 человек. Определите, в каком году население утроится, если ежегодный прирост населения 5%

Ответ оставил Гость

Var g:integer; p:real;
begin
p:=80000000;
g:=2004;
while p<3*80000000 do begin p:=p+p*0.05; g:=g+1; end;
writeln;
writeln(в ,g, году население увеличится в трое.);
end.