迭代——方程求解(mathematica