Население города увеличивается на 3% ежегодно. В 2000 году оно было 65000. Определить число населения в каждом году до 2010. Решите пожалуйста эту задачу в паскале (цикл с параметром)
Answers & Comments
HEuronYA
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.
Answers & Comments
begin
a:=65000;
for b:=2000 to 2010 do
begin
writeln(a:0:0);
a:=a*1.03;
end;
end.