k*****l 发帖数: 177 | 1 Integrate[\[Pi]*r*(b^2-(Sqrt[x^2+d^2-2*d*x*Cos[y]]-r)^2*Sqrt[x^2+d^2-2d*x*
Cos[y]]*x^2),{x,0,a},{y,0,2*\[Pi]}] | k*****l 发帖数: 177 | 2 In[1]:= Integrate[\[Pi]*r*(b^2-(Sqrt[x^2+d^2-2*d*x*Cos[y]]-r)^2)*x^2/Sqrt[x^
2+d^2-2*d*x*Cos[y]],{x,0,a},{y,0,2*\[Pi]}]
还只是算了一个变量。。。。
2 2 2
Out[1]= Integrate[4 Pi r x +
2
2 2 2 (d + x) -4 d x
> (2 b Pi r x (Sqrt[(d - x) ] Sqrt[--------] EllipticK[--------] +
2 2
(
【在 k*****l 的大作中提到】 : Integrate[\[Pi]*r*(b^2-(Sqrt[x^2+d^2-2*d*x*Cos[y]]-r)^2*Sqrt[x^2+d^2-2d*x* : Cos[y]]*x^2),{x,0,a},{y,0,2*\[Pi]}]
|
|