Помогите Турбо Паскаль

Question

Помогите Турбо Паскаль

---

Comments

Привести выражение к красивому виду или программу для вычисления написать?:)

---

напиши решенин

Answer 1

Var
  a, b, x, y, z: real;
begin
  readln(x, y, z);
  a := (sqrt(abs(x - 1)) - sqrt(abs(y))) / (1 + sqr(x) / 2 + sqr(y) / 4);
  b := x*x*x * (power(1 / sin(z), 3) + e);
  writeln('A = ', a, #13, 'B = ', b);
end.

Я не знаю, как в "Турбе" arctan записать, но нашёл, что 1 /sin..  А вообще, не знаю ._.

Comments

спс