оператор цикла

[Miwqa]

нужно написать программу для расчета формулы: X – X2/2 + X3/3 – … + (–1)^(N–1)*X^(N)/N.
пожалуйста, помогите)

[Stilet]

Примерно так:

var i,k:integer;y,x:double;
begin
 Вводим Х и N;
 k:=-1;y:=x;
 for i:=2 to n do begin
  x:=x*x;
  y:=y+k*x/i 
  k:=k*-1;
 end;
end.