Найти сумму ряда x-x^2/2!+x^3/3!+x^4/4.....

$\displaystyle S=\sum_{i=1}^n\left((-1)^{i-1} \frac{x^i}{i!} \right)= \sum_{i=1}^n k_i\frac{a_i}{b_i}; \\ k_i= \left \{ 1, \quad i=1 \atop -k_{i-1}, \quad i\ \textgreater \ 1 \right. \\ a_i= \left \{ {{x, \quad i=1} \atop {x\times a_{i-1}, \quad i\ \textgreater \ 1}} \right. \\ b_i= \left \{ {{1, \quad i=1} \atop {i\times b_{i-1}, \quad i\ \textgreater \ 1}} \right.$

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
var n:=ReadInteger('n=');
var x:=ReadReal('x=');
var s:=x; var k:=1; var a:=x; var b:=1;
for var i:=2 to n do begin k:=-k; a*=x; b*=i; s+=k*a/b end;
Writeln('S=',s)
end.

Тестовое решение
n= 10
x= 1.8
S=0.834687130237714