Клиент внёс в банк Х рублей.Каждый месяц эта сумма увеличивается на Р процентов.
Сколько будет у клиента денег через два месяца,три месяца,через полгода?

procedure multiply (n:real,o:real, f:integer); пишет ожидалсяопиратор

а так? procedure multiply (n:real;o:real; f:integer);

varx,d,e:integer;//start balance and periodp:real;//percent interestBeginprocedure multiply (n:real,o:real, f:integer);beginn:=n+(n*o*0.01);e:=e+1;writeln("Amount of money after ",e," month is ",n);f:=f-1;if (f>0) thenmultiply(n,o,f);end;writeln("Enter start balance on account");readln(x);writeln("Enter the percent of bank interest");readln(p);writeln("Enter the period");readln(d);multiply(x,p,d);End.