Население города N увеличивается на 3% ежегодно, в текущем году оно состовляет 40 тысяч человек. Вывести предпологаемую численность население города из ближайших 5 лет — Pascal(Паскаль)

var b:longint;
    a:real;
    i:byte;
begin
a:=40000;
b:=3;
for i:=1 to 5 do
a:=a+(a*b/100);
writeln('Население через 5 лет: ',trunc(a));
readln;
end.

Leave a Comment

78 + = 83