(В Pascal) Дано целое число x. Вычислить: y=(корень e^((x^2)+2) )/x-9

Var
   x:integer;
   y:real;
Begin
Write('x = ');
ReadLn(x);
if x = 9 then WriteLn('Ошибка: на ноль разделять нельзя!')
else
   Begin
   y:= Sqrt(Exp(x*x+2)); // Выражение упростилось, т.к. положительное число е(2,71828...), всегда возводится в положительную степень (x^2 +2 gt; 0, при любом x)
   WriteLn('f(',x,') = ',y);
   End;
End.