Паскаль ABCпомогите пожалуйста 19 задание 3-я формула

Question

Паскаль ABC
помогите пожалуйста 19 задание 3-я формула

---

Answer 1

Var
  x, y: real;

begin
  readln(x, y);
  writeln('a = ', (3 + power(e, y - 1)) / (1 + sqr(x) * abs(y - tan(x))));
end.

Comments

ты уверен в этом?

---

Правильно ли раскрыта формула? Ну... Да