GroebnerBasis[{x y z-1, x z^2-y^2 , z^2-x y},{x,y,z}]

Solve[{x y z-1==0, x z^2-y^2==0 , z^2-x y==0},{x,y,z},Reals]