Помогите составить задачу на языке Паскаль:
В 1990 году на счет положили 5000 рублей под 14% годовых. В каком году вклад достигнет 1000000 рублей.
Program Project1;
var money: real; year:integer;
begin
money:=5000;
year:=1990;
repeat
money:=money+(money*14)/100;
inc(year);
until money >= 1000000;
writeln(Result:=, year);
readln;
end.
Оцени ответ
