mathematica题求解

用牛顿迭代法求方程想x^3-x^2-2x+1=0在[-1.6,-1]近似根,误差不超过0.001
2026年09月29日 01:58
有1个网友回答
网友(1):

{a,-200,-1},{b,-200,200},{c,-200,200} + {a,1,200},{b,-200,200},{c,-200,200}

+ {a=0},{b,-200,-1},{c,-200,200} + {a=0},{b,1,200},{c,-200,200}
+ {a=0},{b=0},{c,-200,-1} + {a=0},{b=0},{c,1,200}
__________________________________________________________________ or you can
NSum[(-1)^(a+b+c)/(Sqrt[(a+b-c)^2+(-a+b+c)^2+(a-b+c)^2] + Boole[a==0&&b==0&&c==0]),{a,-200,200},{b,-200,200},{c,-200,200}] -1