// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
var y:=x-x**3/3+x**5/5; y.Println;
y:=2**(-x)-Cos(x)+Sin(2*y); y.Println;
y:=(x*x-7*x+10)/(x*x-8*x+12); y.Println;
y:=x-10*Sin(x)+Abs(x**4-x**5); y.Println
end.
Пример
x= 3.18
57.49861907136
2.05593197031244
0.645390070921986
226.492160641852