Запись формулы (pascal)

[spinogryz_ua]

Нужно записать формулу в паскале.

Все никак не могу сообразить что куда. Запутіваюсь постоянно.



Заранее спасибо за помощь!

[whatever]

var
  VRB:real;
begin
  VRB:=ln(abs(x*x*x-1.8))
  VRB:=VRB*VRB*VRB;
  VRB:=Log10(VRB);
  VRB:=VRB*VRB;
  writeln((exp(x*ln(15.4))-exp(3.9*ln(x)))/(sqrt(x*x+VRB)+exp(5.9*ln(9))));
end;

Скорее всего придется еще на части разбить, но это не сложно.