>>405
CoordinatesFromCartesian[{x, y, z}, Spherical] / Degree HoldForm[Degree]