Найти значение функции y = 3x^6 — 6x^2 — 7 при данном значении x — Pascal(Паскаль)

Program Begin25;

Var
  x, y: Real;

Begin
  WriteLn('Введите х');
  ReadLn(x);
  y := 3 * (sqr(x) * sqr(x) * sqr(x)) - 6 * sqr(x) - 7;
  WriteLn('y(x) = ', y);
  ReadLn;

End.