80 ! напишите на паскале авс в сберегательный банк сделан вклад а рублей из расчета т процента годовых.какую сумму получит вкладчик через n лет?

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

//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.