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

// 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