Составьте пожалуйста программу Паскаль Y = -2x^2+3x + 5
Var x,y:integer; begin read(x); y:=-2*sqr(x)+3*x+5; end.