結果 : solve system of equations wolfram mathematica