做且仅做第一题,其余依次类推
Clear["Global`*"];(*mathematica11.2,win7(64bit)Clear all variables*)
(*利用四边形角元塞瓦定理来解决问题,从A点的两个角开始,然后依次BCD三点*)
ans=NSolve[{
Sin/Sin*
Sin/Sin*
Sin/Sin[(90-x)*Degree]*
Sin/Sin==1,
0<x<180(*限制变量范围*)
},{x},100]
求解结果
\[\{\{x\to 10.00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000\}\}\]
王守恩 发表于 2021-2-4 14:11
重温 9 楼，解法不好(太狭窄)，奢望对整理思路有帮助。
第 1 题(看图：x 为起点，顺时针走一圈)。x=1 ...
看样子你似乎知道角元塞瓦定理！
再来解第一题：
\
\
\[{e^{i2x}} = \frac{{E - D}}{{B - D}}/conj\left( {\frac{{E - D}}{{B - D}}} \right) = \frac{{{w^2}( - {p^2} + {p^2}{q^2} + {z^2} - {p^2}{q^2}{z^2} - {w^2}{z^2} + {p^2}{w^2}{z^2})}}{{{q^2} - {p^2}{q^2} - {w^2} + {p^2}{q^2}{w^2} + {w^2}{z^2} - {q^2}{w^2}{z^2}}} = {e^{i\frac{\pi }{9}}}\]
\