Составить программу на языке паскаль. в 1626 году индейцы продали остров манхэттен за 20 $ если бы эти деньги были помещены в банк на текущий счет и ежегодный прирост составил к% то какова была бы сумма в текущем году?

Предыдущий
вопрос Следующий
вопрос

program ManhattanIsland;

var
initialAmount, currentAmount: real;
growthRate: integer;
currentYear: integer;

begin
initialAmount := 20;
growthRate := 5; // Примерный процент прироста
currentYear := 2022;

currentAmount := initialAmount;
repeat
currentAmount := currentAmount * (1 + growthRate / 100);
currentYear := currentYear + 1;
until currentYear = 2022;

writeln('Сумма на текущем счету через несколько лет: ', currentAmount:0:2);
end.