Pascal Дано вещественное число X и целое число N (> 0). Найти значение выражения 1 + X +...

0 голосов
215 просмотров

Pascal
Дано вещественное число X и целое число N (> 0). Найти значение выражения
1 + X + X^2/(2!) + ... + X^N/(N!)
(N! - факториал числа N). Полученное число является приближенным
значением функции exp в точке X.


Информатика (12 баллов) | 215 просмотров
0

Полученное число является приближеннымзначением функции exp в точке X.Объясни!

Дан 1 ответ
0 голосов

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.   

(19 баллов)