Здраствуйте помогите решить выражение номер 9

Question

Здраствуйте помогите решить выражение номер 9

---

Comments

да я добавил посмотри

Answer 1

Var
  x, a, b, y: real;

begin;
  x := -2.5;
  a := 28.4;
  b := 5.7;
  y := 6 * exp(x) / (cos(a) - b * sqr(b));
  writeln('y=', y)
end.

Тестовое решение:
y=-0.00264527050582443

Comments

составьте алгоритм пожалуйста

Answer 2

const
  x = -2.5;
  a = 28.4;
  b =  5.7;

var
  c: array [1..7] of real;
  y: real;

begin
  c[1] := exp(x);      //e^x
  c[2] := 6 * c[1];    //6 * e^x
  c[3] := cos(a);      //cos(a)
  c[4] := b * b;       //b^2
  c[5] := c[4] * b;    //b^3
  c[6] := c[3] - c[5]; //cos(a) - b^3
  c[7] := c[2] / c[6]; //(6 * e^x) / (cos(a) - b^3)
  y    := c[7];
  writeln(y);
end.