Помогите пожалуйста!!! Значения функции е^x равно сходящейся сумме бесконечного ряда: e^x=1+x/1!+x^2/2!+x^3+...+x^n/n!+... Нужно получить рекуррентную формулу для слагаемых. используя цикла while, repeat и for, на паскале!!!!
Program series uses crt; var i,n:integer; b:real; BEGIN readln(n); for i:=0 to n do begin b:=b+(exp(ln(n) * i)/fact(i)) end; writeln(b);//answer function fact(x:integer):integer; begin if x=0 then fact:=1 else fact:=fact(x-1)*x; end; END.