var x: longint; n:real; begin write('Ввердите x: '); read(x); n:=56*x+cos(x)-x*x*x; write('Результат: ',n:0:9); end.