Mathematica gives an explicit formula for the solution to your equation, if I do not misunderstand your third equation:
eq1 = 1.30000 ==
Sqrt[(6.64730 - x)^2 + (10.17180 - y)^2 + (5.66580 - z)^2];
eq2 = w == Sqrt[(5.9169 - x)^2 + (11.4014 - y)^2 + (4.4454 - z)^2];
eq3 = 118.0000 ==
ArcCos[((1.8800)^2 + (1.30000)^2 - (w)^2)/(2*1.8800*(1.30000))]*(180/Pi);
sol = Solve[{eq1, eq2, eq3}] // Simplify
The solution triples x,y,z lie in a 3D circle:
ParametricPlot3D[Evaluate[{x, y, z} /. sol], {x, 0, 20},
AxesLabel -> {x, y, z}]