Некто кладет в банк сумму в А рублей под p% годовых. Какая сумма окажется на счете через год? Через два года?программа PascalABC

// PascalABC.NET (версия 3.2, сборка 1363) var   a, p: integer; function GetDepositValue(a, p, n: integer): real; begin   GetDepositValue := a * Power(1 + p / 100, n); end; begin   a := ReadInteger('a = ');   p := ReadInteger('p = ');   writeln('Через год: ', GetDepositValue(a, p, 1):1:2);   writeln('Через два года: ', GetDepositValue(a, p, 2):1:2); end.