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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
