【Mathematica】考察线段乘积的最值的几何问题

1、先假设题目中四个点的坐标：

3、求最大值：Maximize[{y,0<=t<=2Pi},t]//FullSimplify

5、令g==0，得到四个解：Solve[{g==0,0<=t<=2Pi},t]

6、可以通过观察发现，当t等于4 ArcTan[2+Sqrt[5]]的时候，有最大值。此时，DC^2=16/5，DB^2=8。