Question

mathematica解方程组

Solve[{(\[Pi] r^2)/3 + (a*\[Pi] r x)/Sqrt[r^2 + x^2] == 0,
4 a*\[Pi] R + 2 \[Pi] R^2 + (2 a*\[Pi] R^2)/
Sqrt[-r^2 + R^2] + (\[Pi] R (r^2/3 + (2 R^2)/3))/
Sqrt[-r^2 + R^2] + 2 \[Pi] *a*Sqrt[-r^2 + R^2] +
4/3 \[Pi] R Sqrt[-r^2 + R^2] ==
0, -((2 *a*\[Pi] r R)/
Sqrt[-r^2 + R^2]) - (\[Pi] r (r^2/3 + (2 R^2)/3))/
Sqrt[-r^2 + R^2] + 2/3 \[Pi] r Sqrt[-r^2 + R^2] + (2 \[Pi] r x)/
3 + (a*\[Pi] r^2)/Sqrt[r^2 + x^2] + \[Pi] *a Sqrt[r^2 + x^2] ==
0, \[Pi] r Sqrt[r^2 + x^2] + 2 \[Pi] R^2 +
2 \[Pi] R Sqrt[-r^2 + R^2] == S}, {R, r, x, a}]

mathmatica为什么解不出来？

Answer 1

你Solve的格式写的不对方程组之间要用&&连接，Solve的帮助里第二个就是方程组的例子

追问

还是不行啊

追答

你这个方程组解析解可能要花很久，可以试试NSolve，将一些变量赋值，做数值解，数值解很快的