Question

:гражданин 1 марта открыл счёт в банке, вложив 1000 рублей. через каждый месяц размер вклада увеличивается на 2% от имеющейся суммы. определить: сумму вклада через один, два, …, двенадцать месяцев. анализ условия: • что нам известно? • что надо найти? • сколько переменных используется в ? • какие переменные мы будем вводить, а какие рассчитывать? • к какому типу относятся переменные вводимые с клавиатуры? • если эти переменные относятся к вещественному типу, то какой результат мы получим? • как мы обозначим переменные? • первоначальный вклад а0=1000 • 1 месяц: а1=а0+а0*0,02 • 2 месяц: а2=а1+а1*0,02 • • 10 месяц: а10=а9+а9*0,02 • общий случай: an=an-1+an-1*0,02

Answer 1

Var a:real;i:integer;
begin
a:=1000;
for i:=1 to 12 do
 begin
 a:=a+0.02*a;
 writeln(i,' - ',a:7:2);
 end;
end.

Результат:
1 - 1020.00
2 - 1040.40
3 - 1061.21
4 - 1082.43
5 - 1104.08
6 - 1126.16
7 - 1148.69
8 - 1171.66
9 - 1195.09
10 - 1218.99
11 - 1243.37
12 - 1268.24