Составить программу для вычисления функции - Pascal ABC (13088)

Добрый день всем,может кто нибудь помочь с написанием программы? Всем спасибо. Составить программу для вычисления функции b=f(x,y,z)

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

var
  x, b, z: real;
 
begin
  readln(x, z);
  b := z * ((x * x + 4) / (sqr(sin(z)) + x / 2));
  writeln(b);
end.

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

В данном коде происходит следующее:

Объявляются три переменные: x, b и z, которые имеют тип real (число с плавающей точкой).
Считывается значение двух переменных: x и z, с помощью функции readln().
Вычисляется значение переменной b по формуле: b = z ((x x + 4) / (sqrt(sin(z)) + x / 2)).
Значение переменной b записывается в выходной поток с помощью функции writeln(). Таким образом, программа вычисляет значение функции, заданной в задаче, и выводит результат на экран.