Вычисление суммы членов ряда с точностью до члена ряда, меньшего ε - PascalABC.NET
Формулировка задачи:
Составить программу для вычисления суммы членов ряда с точностью до члена ряда, меньшего ε( по абсолютной величине). Первоначально N=1. Используйте рекуррентные формулы для вычислений значений членов ряда.
Ряд X^(2N+1)/(2N+1)!
ε =10^(-5)
X=-1.42
Решение задачи: «Вычисление суммы членов ряда с точностью до члена ряда, меньшего ε»
textual
Листинг программы
const e=1e-5;
x=-1.42;
var s,t:real;
n:integer;
begin
n:=0;//не 1
t:=x;
while abs(t)>e do
begin
n:=n+1;
t:=t*x*x/2/n/(2*n+1); //рекуррентная формула
s:=s+t; //A[n]=A[n-1]*x^2/(2n*(2n+1))
end;
write('S=',s:0:5);
end.