Гражданин открыл счет в банке,вложив x рублей под z% годовых.Какова будет сумма вклада через y лет?
Var x, z: real; i, y: integer; begin Readln(x, y, z); for i := 1 to y do x := x * (100 + z) / 100; Writeln(x); end.
от души