В1985 году в городе было 45000 человек. ежегодный прирост составлял 3%. сколько жителей было бы в городе в 2017 году? написать программу( в паскале)

Var m,n,h,i:longint;begin read(n); h:=2017-1985; h:=h+1; for i:=1 to h do  begin   m:=n div 100;   m:=m * 3;   n:=n+m;  end; writeln(n);end.