mathematica解方程的问题