用Mathematica解方程组,输出如下错误,何意?另考虑到是否为无解,请问用该软怎么判断方程组是否有解?
输入Solve[(y1-y2)/(x1-x2)=(55-16)/(-8-
13),(x1-x2)^2+(y1-y2)^2=(55-16)^2+(-8-
13)^2,(x2-5)^2+(y2-10)^2=(13-5)^2+(16-
10)^2,(x1-5)^2+(y1-10)^2=(-8-5)^2+(55-10)^2,{x1,
x2,y1,y2}]
输出Set::write:TagTimesin(y1-y2)/(x1-x2)isProtected.>>
Set::write:TagPlusin(x1-x2)^2+(y1-y2)^2isProtected.>>
Set::write:TagPlusin(-5+x2)^2+(-10+y2)^2isProtected.>>
General::stop:FurtheroutputofSet::writewillbesuppressedduringthiscalculation.>>
Solve::nonopt:Optionsexpected(insteadof{x1,x2,y1,y2})beyondposition4inSolve[-(13/7),1962,100,2194,{x1,x2,y1,y2}].Anoptionmustbearuleoralistofrules.>>
上面的输入出错误了，少了一个“=”。
输入改正为下：Solve[(y1-y2)/(x1-x2)==(55-16)/(-8-
13),(x1-x2)^2+(y1-y2)^2==(55-16)^2+(-8-
13)^2,(x2-5)^2+(y2-10)^2==(13-5)^2+(16-
10)^2,(x1-5)^2+(y1-10)^2==(-8-5)^2+(55-
10)^2,{x1,x2,y1,y2}]
输出为：Solve::nonopt:Optionsexpected(insteadof{x1,x2,y1,y2})beyondposition4inSolve[(y1-y2)/(x1-x2)==-(13/7),(x1-x2)^2+(y1-y2)^2==1962,(-5+x2)^2+(-10+y2)^2==100,(-5+x1)^2+(-10+y1)^2==2194,{x1,x2,y1,y2}].Anoptionmustbearuleoralistofrules.>>
输出提示为何意？用何种方法判断方程组是否有解？急...
邮箱： 