Перевести формулу на язык Паскаль.

Sqrt(Abs((Cos(2*x*z)+ArcTan(2*x*z))/(Exp(3*Ln(10)))*(((1-Cos(2*2*x*z))/2)+10)+15))+Exp(Exp(1/3*ln(Sqrt(Sqr(x-z))))*Ln(e)