|
本帖最后由 王守恩 于 2022-4-28 17:37 编辑
N[Solve[{1/x ==Sin[Pi/4 - a]/(2Sin[Pi/4 + a + b])==Sin[2a]Sin[a]/(4Sin[ b]Cos[a])
== (Sin[Pi/4 - a] Sin[a])/( Sin[Pi/4 + a] Cos[a]), 1 > a > 0, 1 > b > 0}, {x, a, b}], 20]
{{x -> 6.0000000000000000000, a -> 0.46364760900080611621, b -> 0.64350110879328438680},
{x -> 6.1754694825423494726, a -> 0.49195796769042292304, b -> 0.76000620420919120343}} |
|