{
Задача сделана на языке паскаль, при помощи PaskalPlus
Оформление сделана как для студенческой задачи

Если есть вопросы пиши в личку


Файл: progam_stud.pas
Задача:
  
Автор:
   
Дата:
  }

  
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.