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

Question

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

---

Answer 1

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 > 0, при любом x)
   WriteLn('f(',x,') = ',y);
   End;
End.