Для заданного X вычислите Y по формуле:
y=x^3+2,5x^2-x+1
программу надо написать?
да да
Var x,y: real; begin write('Введите x: '); readln(x); y:=x*x*x+2.5*x*x-x+1; writeln('Ответ ',y); end.
спасибо большое!)
пожалуйста