ДАМ 80 БАЛЛОВ! напишите ** паскале АВС В сберегательный банк сделан вклад А рублей из...

Question

ДАМ 80 БАЛЛОВ!
напишите на паскале АВС
В сберегательный банк сделан вклад А рублей из расчета Т процента годовых.Какую сумму получит вкладчик через n лет?

Answer 1

Для фиксированной ставки.

//Pascal
var  
  A, T, p: real;
  n, i: integer;
begin
  write('Введите сумму вклада(A) = '); readln(A);
  write('Введите процент годовых(T) = '); readln(T);
  write('Введите срок(лет)(n) = '); readln(n);
  p := A * T / 100;
  for i := 1 to n do A := A + p;
  writeln('Итоговая сумма с учетом % по вкладам = ', A);
end.

---