Solve[A*Sin[85 Degree] + B*Sin[60 Degree] - 4*Sin[5 Degree] - C*Sin[D] == 0 && A*Cos[85 Degree] - B*Cos[60 Degree] + 4*Cos[5 Degree] + C*Cos[D] == 0 && 10*Sin[5 Degree] - 3*A*Sin[85 Degree] - B*Sin[60 Degree] == 0 && E*Cos[F] - B*Cos[43 Degree] + C*Cos[(103 Degree - D)] == 0 && E*Sin[F] - B*Sin[43 Degree] + C*Sin[(103 Degree - D)] == 0 && 2.6*C*Sin[(103 Degree - D)] - 1.2*B*Sin[43 Degree] == 0, {A, B, C, D, E, F}, Reals]

我试了试这个问题, 下面的解决方案也许不完美
eqs = {a*Sin[85. Degree] + b*Sin[60. Degree] - 4.*Sin[5. Degree] -
c*Sin[d],
a*Cos[85. Degree] - b*Cos[60. Degree] + 4.*Cos[5. Degree] +
c*Cos[d],
10.*Sin[5. Degree] - 3.*a*Sin[85. Degree] - b*Sin[60. Degree],
e*Cos[f] - b*Cos[43. Degree] + c*Cos[(103. Degree - d)],
e*Sin[f] - b*Sin[43. Degree] + c*Sin[(103. Degree - d)],
2.6*c*Sin[(103. Degree - d)] - 1.2*b*Sin[43. Degree]};
sol1 = First@NSolve[eqs[[3]] == 0, {a}]
temp = FullSimplify[eqs /. sol1]
sol2 = First@
NSolve[{temp[[1]] == 0, temp[[2]] == 0, temp[[6]] == 0}, {b, c, d}]
temp = FullSimplify[temp /. sol2]
sol3 = First@NSolve[{temp[[4]] == 0, temp[[5]] == 0}, {e, f}]
sol1 /. sol2
依次运算得到abcdef的值
a -> -3.18365, b -> 11.9929, c -> -7.23755, d -> -1.89261, e -> 5.1123, f -> 1.03818