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

Y:=5*sqr(x)-10*x+2

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

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