Помогите записать Формyлы - Pascal

Формулировка задачи:

Формyлы в докyменте Ворд. Спс заранее.

Решение задачи: «Помогите записать Формyлы»

Листинг программы

function ArcSin(x:real):real;
begin
    ArcSin := ArcTan(x / sqrt(1 - sqr(x)));
end;
 
y := sqr( sqr(cos(a-Pi)) + ln(sqr(abs(2*x+1))) + 4.5*sqr(sqr(x)) + 0.009 * exp(1/3 * ln( sin(x) + 9.6 * exp(3.1 * ln(10)) )) )
   / sqrt(abs( exp(-x) * sqr(x) - 1.9 * (ArcSin(sqr(b)) + sqrt(2*x + a)) ));

Объяснение кода листинга программы

В данном коде написана функция ArcSin, которая принимает на вход значение x типа real и возвращает значение типа real. Внутри функции используется формула для вычисления значения функции ArcSin. Также в коде есть присваивание значения переменной y. При этом используется выражение, которое включает в себя вычисление значения функции ArcSin и нескольких других функций. Список вычислений в данном коде:

Вычисление значения функции ArcTan по формуле ArcSin = ArcTan(x / sqrt(1 - sqr(x))).
Вычисление значения функции sqr по формуле sqr(cos(a-Pi)).
Вычисление значения функции ln по формуле ln(abs(2*x+1)).
Вычисление значения функции sqr по формуле sqr(4.5*sqr(x)).
Вычисление значения функции exp по формуле exp(0.009 (1/3 ln(sin(x) + 9.6 exp(3.1 ln(10))))).
Вычисление значения функции sin по формуле sin(x).
Вычисление значения функции sqrt по формуле sqrt(2*x + a).
Вычисление значения функции abs по формуле abs(exp(-x) sqr(x) — 1.9 (ArcSin(sqr(b)) + sqrt(2*x + a))). Значения переменных a и b в данном коде не определены.