Найти сумму бесконечного ряда

[Кён]

с точностью до члена ряда меньшего эпсилон равного 0,001
у=1+х+x^2/2!+x^3/3!+...
при х от -1 до 1 с шагом 1.

[Mad_Cat]

s:=1;
i:=1;
sl=x;
while sl>e do begin
s:=s+sl;
i:=i+1;
sl:=sl*x/i;
end;
writeln(s);

в функу сами оберните=)

[Кён]

Эм..а можно для совсем тупого студента объяснить поподробнее? =)

[Mad_Cat]

можно для совсем тупого студента объяснить поподробнее? =)

Гуглить по запросу "Реккурентное соотношение"