lingo编程R=50;x1=0;x2=R*sqrt(3);x3=R/2*sqrt(3);y1=0;y2=0;y3=1.5*R;a1=sqrt((x1-x2)^2+(y1-y2)^2);a2=sqrt((x2-x3)^2+(y2-y3)^2);a3=sqrt((x1-x3)^2+(y1-y3)^2);p=(a1+a2+a3)/2;s=sqrt(p*(p-a)*(p-b)*(p-c));这个程序怎么编?这是关于三个圆相交

Question

lingo 编程
R=50;
x1=0;x2=R*sqrt(3);x3=R/2*sqrt(3);
y1=0;y2=0;y3=1.5*R;
a1=sqrt((x1-x2)^2+(y1-y2)^2);
a2=sqrt((x2-x3)^2+(y2-y3)^2);
a3=sqrt((x1-x3)^2+(y1-y3)^2);
p=(a1+a2+a3)/2;
s=sqrt(p*(p-a)*(p-b)*(p-c));
这个程序怎么编?
这是关于三个圆相交的问题,要保证三个圆的公共部分存在,同时公共部分面积最小,即三个圆心构成的三角形面积最大.其中有x±1,y±2的偏差.要把这个偏差变量加进去.
最后求这个面积的最大值.

Answer 1

这样就可以了
R=50;
x1=0;x2=R*@sqrt(3);x3=R/2*@sqrt(3);
y1=0;y2=0;y3=1.5*R;
a1=@sqrt((x1-x2)^2+(y1-y2)^2);
a2=@sqrt((x2-x3)^2+(y2-y3)^2);
a3=@sqrt((x1-x3)^2+(y1-y3)^2);
p=(a1+a2+a3)/2;
s=@sqrt(p*(p-a)*(p-b)*(p-c));
max=s;