Гражданин открыл счёт в банке 1 марта на 1000 рублей. Каждый месяц сумма увеличивалась на 2%. Через сколько месяцев размер вклада превысит 1200 рублей? Составить программу на Pascal и блок схему!

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

Результат: 1 - 1020.002 - 1040.403 - 1061.214 - 1082.435 - 1104.086 - 1126.167 - 1148.698 - 1171.669 - 1195.0910 - 1218.9911 - 1243.3712 - 1268.24