Решите плиз через паскаль-_- 2 формулу

//PascalABC.NET

var
  u, x, y, z: real;
begin
  x := -4.5;
  y := 0.75 * power(10, -4);
  z := 0.845 * power(10, 2);
 
  u := (power(8 + sqr(абс(x - y)) + 1, 1 / 3) /
       (sqr(x) + sqr(y) + 2)) - exp(абс(x - y)) *
       power(sqr(tan(z)) + 1, x);
      
  writeln(u:0:4);
end.