как в паскале записывается выражение y=5x^2-10x+2?

y:=5*sqr(x)-10*x+2var  x, y: real;beginwrite('Введите x: ');read(x);y := 5 * sqr(x) - 10 * x + 2;writeln('y=', y)end.

Var y,x:double;BEGINx:=1;y:=5*sqr(x)+10*x+2;WriteLn(y);Readln();END.кажется так