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