Гражданин 1 марта открыл счет в банке вложив 1000 руб. через каждый месяц размер вклада увеличивается на 2% от имеющейся суммы. определить: 1) за какой месяц величина ежемесячного вклада превысит 30 руб. 2) через сколько месяцев размер вклада превысит 1200 руб. var k,b: integer; x,v: real; begin v: =1000; repeat v: =v*1.02; inc(k) until v> 1200; x: =0; repeat beginv: =v+x; x: =v*0.02; inc(b); end; until x> =30; writeln('через ',b,' месяцев велечина ежемесячного вклада привысит 30 руб.'); writeln('через ',k,' месяцев размер вклада будет больше 1200 руб.'); end.