Question

Сбербанк начисляет 7% годовых. Какой станет сумма k руб., положенная в банк на n лет. Pascal.

Answer 1

//Pascal ABC.NET 3.2 сборка 1318

Var
  k:real;
  i,n:integer;
begin
readln(k);
readln(n);
for i:=1 to n do
  k*=1.07;
writeln(k);
end.

Пример ввода:
100
2
Пример вывода:
114.49