Question

Помогите, пожалуйста!! Информатика. Срочно! Вычислить в Паскаль :

Answer 1

                                   PascalABC.NET

begin

 var x := ReadInteger('Введите x =');

 Println('y =',x-x*x/3+x**6/4);

 

 x := ReadInteger('Введите x =');

 Println('y =',3**-x+cos(x)-sin(sqr(x)));

 

 x := ReadInteger('Введите x =');

 Println('y =',(x**3+9*x+12)/(x*x-6*x+15));

 

 x := ReadInteger('Введите x =');

 Println('y =',x+12*sin(2*x)+abs(x**3+x**5));

end.