Доход магазина

Известно, что доход магазина в каждый из 12 месяцев года увеличивался на 5% от дохода предыдущего месяца. Найти средний доход магазина в месяц, если в 1-й месяц доход магазина составлял A тыс. руб.

В цикле for, начиная со второго месяца, будем искать доход магазина в каждый месяц (5% от дохода предыдущего месяца) и будем копить общий доход. Для расчета среднего дохода разделим общий доход на 12.

Программа решения:

var i,a:integer;s,p,s1:real;

begin

readln(a);

s:=a; s1:=a;

for i:=2 to 12 do

begin

p:=s*5/100;

s:=s+p;

s1:=s1+s;

end;

writeln(s1/12:2:2);

end.