如何利用mathematica解方程并输出