Ответы и объяснения

2013-02-10T11:48:31+04:00

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