найти сумму ряда 1-1/2!+1/3!-1/4!.. c заданной точностью. Как сделать ее? . c заданной точностью. Как сделать ее

Сделай предположение, что сея сумма конвергирует (проверяется на раз соотв. мажорирующим рядом) и вычисляй свою сумму, пока очередной ее член не станет меньше заданной точности.

f:=1;
k:=2;
s:=1;
while 1/f> epsilon do begin
f:=f*k;
inc(k);
if even(k) then
s:=s-1/f
else
s:=s+1/f;
end;