Население города увеличивается на 3% каждый год. В 1993 году население города составляло 65000. Напишите программу которая выведит на экран предсказываемую численность населения города в каждом году вплоть до 2014

Составьте , пожалуйста , программу.
Паскаль.

Простая


Program p;
var ch:real;   
         i:integer;
begin 
ch:=65000; 
For i:= 1993 to 2013 do
      begin   
         ch:=trunc(ch*1.03);   
         Writeln(Численность населения в году №,i+1, равна ,ch);   
       end;
end.

Для любых данных

Program p;
var year,y1:integer;  
      ch:real;   
      i:integer;
begin
    Write(Введите начальный год: ); 
    Readln(year); 
    Write(Введите конечный год: ); 
    Readln(y1); 
    Write(Введите число населения: );
    Readln(ch); 
    For i:= year to y1-1 do   
      begin   
          ch:=trunc(ch*1.03); 
          Writeln(Численность населения в году №,i+1, равна ,ch); 
     end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.