Question

Население города увеличивается на 3% ежегодно. В 2000 году оно было 65000. Определить число населения в каждом году до 2010.
Решите пожалуйста эту задачу в паскале (цикл с параметром)

Answer 1

var b:integer;   a:real;
begin
a:=65000;
for b:=2000 to 2010 do
begin
writeln(a:0:0);
a:=a*1.03;
end;
end.