Помогите расписать эту задачку так,как нужно в Pascalтам после равно abs и тд

Question

Помогите расписать эту задачку так,как нужно в Pascal
там после равно abs и тд

---

Answer 1

Var x: Integer;
begin
readln(x);
writeln(((3/abs(x))+(exp((1/3) * ln(x))))/1);
end.