Pascal Дано вещественное число X и целое число N ( больше 0). Найти значение выражения 1 + X + X^2/(2!) + ... + X^N/(N!) (N! - факториал числа N). Полученное число является приближенным значением функции exp в точке X.
Pascal
Дано вещественное число X и целое число N (> 0). Найти значение выражения
1 + X + X^2/(2!) + ... + X^N/(N!)
(N! - факториал числа N). Полученное число является приближенным
значением функции exp в точке X.
Ответ(ы) на вопрос:
program qwer;
uses
crt;
var
x:real;
n,i,b:integer;
begin
b:=1;
write('введите вещественное число x=');
readln(x);
write('введите конечное значение цикла n=');
readln(n);
writeln; //переход на другую строку
for i:=1 to n do
begin
b:=b*i; //факториал
x:=x+(power(x,i))*b; //сумма последовательности
writeln('значение функции exp в точке x',i,'=',x+1)
end;
end.
Не нашли ответ?
Похожие вопросы