Program qqq;
uses crt;
var x,y:real;
BEGIN
writeln('vvedite x');
readln(x);
y:=abs(x)+4*x*x*x-7*x*x;
writeln('otvet y ',y:7:2);
readln;
END.