X-10sinx+|x^4 - x^5| решите паскаль)​

program Calc2;

uses

 Math;

var

 x, y: Real;

begin

 Write ('X = ');

 ReadLn (x);

 y := x - 10 * Sin (x) + Abs (Power (x, 4) - Power (x, 5));

 WriteLn ('Результат = ', y);

 ReadLn;

end.

Объяснение: