В паскале помогите решить пожалуйста

Question

В паскале помогите решить пожалуйста

---

Comments

x-целое число ил вещественное

---

Целое

---

Его нужно ввести с клавиатуры и решить данный пример

Answer 1

X=X-(sqr(x)*x/3*2)+(sqr(x)*sqr(x)*x/5*4*3*2)-(sqr(x)*sqr(x)*sqr(x)*x/7*6*5*4*3*2)+(sqr(x)*sqr(x)*sqr(x)*sqr(x)*x/9*8*7*6*5*4*3*2)-(sqr(x)*sqr(x)*sqr(x)*sqr(x)*sqr(x)*x/11*10*9*8*7*6*5*4*3*2)+(sqr(x)*sqr(x)*sqr(x)*sqr(x)*sqr(x)*sqr(x)*x/13*12*11*10*9*8*7*6*5*4*3*2)

Comments

Спасибо

---

у боле правильный код

Answer 2

Var  f: real; x :integer;
begin  //Ввод  writeln ('введите x');  readln (x);
 //решение
f:= x-(Power(x,3)/6)+(Power(x,5)/120)-(Power(x,7)/5040)+(Power(x,9)/362880)-(Power(x,11)/39916800)+(Power(x,13)/6227020800);  {f:=Power(x,2);} //вывод writeln ('f = ', f);  end.