Написать программку, которая выводит таблицу значений функции у = -2,4х2+5х-3

Pascal /Delphi
var x,y: real;
begin
y:=0;
x:=-2;
while (xlt;2) do
y:=y+(-2,4)*x*2+5*x-3;
writeln('y = ',y);
readln;
end.

C++
include lt;iostreamgt;
using namespace std;
int main()
float x,y;
x=-2;
y=0;
while (xlt;2)
y+=-2,4*x*2+5*x-3;

cout lt;lt; "y = " lt;lt; y;
return 0;