Задание:
Помогите пожалуйста! Значения функции е^x равно сходящейся сумме бесконечного ряда: e^x=1+x/1! +x^2/2! +x^3+… +x^n/n! +… Нужно получить рекуррентнуюформулу для слагаемых. Используя цикла while, repeat и for, на паскале!
Решение:
Program seriesuses crt; vari,n: integer; b: real; BEGINreadln (n); for i: =0 to n dobeginb: =b+(exp (ln (n)*i) /fact (i) end; writeln (b); //answerfunction fact (x: integer): integer; beginif x=0 then fact: =1else fact: =fact (x-1)*x; end; END.
Знаете другой ответ?