Question

Помогите пожалуйста!!! Значения функции е^x равно сходящейся сумме бесконечного ряда: e^x=1+x/1!+x^2/2!+x^3+...+x^n/n!+... Нужно получить рекуррентную формулу для слагаемых. используя цикла while, repeat и for, на паскале!!!!

Answer 1

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.