- 注册时间
- 2021-11-19
- 最后登录
- 1970-1-1
- 威望
- 星
- 金币
- 枚
- 贡献
- 分
- 经验
- 点
- 鲜花
- 朵
- 魅力
- 点
- 上传
- 次
- 下载
- 次
- 积分
- 9911
- 在线时间
- 小时
|
楼主 |
发表于 2024-6-4 10:42:04
|
显示全部楼层
按照你四点共圆的思路:
- Clear["Global`*"];
- deg=Pi/180;(*角度制下1°所对应的弧度*)
- (*子函数,利用三边计算角的余弦值,角是c边所对的角*)
- cs[a_,b_,c_]:=((a^2+b^2-c^2)/(2*a*b))
- (*利用余弦定理,得到约束条件*)
- cond1=Numerator@Together[cs[x+x,2*x+y,4*Sqrt[3]]-Cos[60deg]]
- cond2=Numerator@Together[cs[x,y,z]-Cos[60deg]]
- cond3=x*(2x)-y*(y+2x) (*假设BCNM四点共圆,切割线定理*)
- ans=Solve[{cond1,cond2,cond3}==0,{x,y,z}]//FullSimplify//Expand(*求解方程组*)
- Grid[ans,Alignment->Left](*列表显示*)
- Grid[N@ans,Alignment->Left](*列表显示,数值化*)
复制代码
求解结果
\[\begin{array}{lll}
x\to -2 \sqrt{2} & y\to 2 \sqrt{2}-2 \sqrt{6} & z\to 2 \sqrt{3}-6 \\
x\to -2 \sqrt{2} & y\to 2 \sqrt{2}-2 \sqrt{6} & z\to 6-2 \sqrt{3} \\
x\to -2 \sqrt{2} & y\to 4 \sqrt{\sqrt{3}+2} & z\to -2 \sqrt{3}-6 \\
x\to -2 \sqrt{2} & y\to 4 \sqrt{\sqrt{3}+2} & z\to 2 \sqrt{3}+6 \\
x\to 2 \sqrt{2} & y\to -4 \sqrt{\sqrt{3}+2} & z\to -2 \sqrt{3}-6 \\
x\to 2 \sqrt{2} & y\to -4 \sqrt{\sqrt{3}+2} & z\to 2 \sqrt{3}+6 \\
x\to 2 \sqrt{2} & y\to 2 \sqrt{6}-2 \sqrt{2} & z\to 2 \sqrt{3}-6 \\
x\to 2 \sqrt{2} & y\to 2 \sqrt{6}-2 \sqrt{2} & z\to 6-2 \sqrt{3} \\
\end{array}\]
数值化
\[\begin{array}{lll}
x\to -2.82843 & y\to -2.07055 & z\to -2.5359 \\
x\to -2.82843 & y\to -2.07055 & z\to 2.5359 \\
x\to -2.82843 & y\to 7.72741 & z\to -9.4641 \\
x\to -2.82843 & y\to 7.72741 & z\to 9.4641 \\
x\to 2.82843 & y\to -7.72741 & z\to -9.4641 \\
x\to 2.82843 & y\to -7.72741 & z\to 9.4641 \\
x\to 2.82843 & y\to 2.07055 & z\to -2.5359 \\
x\to 2.82843 & y\to 2.07055 & z\to 2.5359 \\
\end{array}\]
只有最后一组解可能是结果!
难道老同志这次又猜对了吗?
|
|