Гражданин 1 марта открыл счет в банке, вложив 1000 руб. Через каждый месяц размер вклада увеличивается на 2% от имеющейся суммы. Определить: а) прирост суммы вклада за первый, второй, …, десятый месяц; б) сумму вклада через три, четыре, …, двенадцать месяцев.
на паскале напишите пожалуйста. очень срочно♥
- var d: integer;r,s:real;beginr:=1000;for d:=1 to 12 dobeginr:=r+r*(2/100);r := r*100;r := round(r);r := r/100;s:=r*(2/100);s := s*100;s := round(s);s := s/100;writeln(‘Сумма вклада через ‘,d, ‘ месяц = ‘, r, ‘ руб’,’. Прирост в следующем месяце ‘, s, ‘ руб’); end;
end.