Информатика Вычислить в Паскаль :

                                   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.