Вычислить значение функции для паскаль y=x в кубе-(2.5x-3)

Program func;
var x, y: real;
begin
writeln('vvedite znachenie-x');
readln(x);
y:=x^3-(2.5*x-3);
writeln(y);
readln;
end.