Гражданин 1 января открыл счёт в банке, вложив 100 000 р. Каждый месяц размер вклада увеличивается на 3% от имеющийся суммы. Составьте программу для определения суммы вклада через 1, 2, ..., 12 месяцев. Результат выведите в два столбца: в первый столбец - номер месяца, во второй - соответствующую сумму вклада.

ABC pascal

Question

Ольгуша

18 марта, 10:15

+1

Ответы (1)

Знаете ответ на вопрос?

Ира · Answer 1

Program tref;

var a, i:integer;

begin

a:=100000;

for i:=1 to 12 do

begin

writeln (i,') ', a) ;

a: = (a*103) div 100;

end;

readln;

end.