program z1; uses crt; var x,b,c,d:real; BEGIN writeln('vvedite x '); readln(x); b:=((3*x*x*x+18*x*x)*x); c:=(12*x*x-5); d:=b+c; writeln('otvet d ' ,d:6); readln; END.