| 查看: 406 | 回复: 1 | ||
花若离繁金虫 (小有名气)
|
[求助]
一个积分求解
|
» 本主题相关价值贴推荐,对您同样有帮助:
哪些书里面有讲解关于含有积分方程的未知数求解问题啊?非常感谢!
已经有9人回复
求助!!!我想要在fluent中针对一个面进行积分,那么UDF应该用什么宏函数?怎么用?
已经有5人回复
求解一个反常积分
已经有8人回复
毕设,数学相关专业,求指导!
已经有18人回复
请教一个Mathematica积分的问题(重金求解)
已经有6人回复
【求助】matlab求解一个简单的积分(急!!!)
已经有7人回复
origin8.0求积分
已经有7人回复
【求助】积分微分方程matlab求解
已经有6人回复
【求助】Aspen Custom Model做积分计算
已经有10人回复
【求助】DOS怎么积分得到电子数
已经有16人回复
【求助】偏微分方程的基本解
已经有5人回复
【求助】一个二重积分问题【已解决】
已经有17人回复

hank612
至尊木虫 (著名写手)
- 数学EPI: 14
- 应助: 225 (大学生)
- 金币: 14270.6
- 散金: 1055
- 红花: 95
- 帖子: 1526
- 在线: 1375.8小时
- 虫号: 2530333
- 注册: 2013-07-03
- 性别: GG
- 专业: 理论和计算化学
【答案】应助回帖
|
用Mathematica算地,怎么看着好复杂啊。 将就咯 In[5]:= Integrate[Sqrt[4a-(x-1-a)^2]/((1+b*x)*(2*Pi*a*x)), {x,(1-Sqrt[a])^2,(1+Sqrt[a])^2}] 2 2 Out[5]= ConditionalExpression[(-(Pi + 2 Sqrt[-1 - 2 (1 + a) b - (-1 + a) b ] Log[2] + (4 I) Sqrt[a] > (2 I) (-1 + a) b Log[-------------] - 3 (-1 + a) 2 2 2 > 2 Sqrt[-1 - 2 (1 + a) b - (-1 + a) b ] Log[1 + (-1 + Sqrt[a]) b] + 2 2 2 > 2 Sqrt[-1 - 2 (1 + a) b - (-1 + a) b ] Log[Sqrt[a] (1 + (-1 + Sqrt[a]) b)]) / (2 b) + -Pi (-4 I) Sqrt[a] > (--- + I (-1 + a) b Log[--------------] - 2 3 (-1 + a) 2 2 2 > Sqrt[-1 - 2 (1 + a) b - (-1 + a) b ] Log[1 + (1 + Sqrt[a]) b] + 2 2 2 > Sqrt[-1 - 2 (1 + a) b - (-1 + a) b ] Log[-2 Sqrt[a] (1 + (1 + Sqrt[a]) b)]) / b) / 1 + a 1 + a > (2 a Pi), Re[(1 + a) b] >= -1 && (------- \[NotElement] Reals || Re[-------] > 2 || Sqrt[a] Sqrt[a] 2 1 + a -1 - (-1 + Sqrt[a]) b > Re[-------] < -2) && (---------------------- \[NotElement] Reals || Sqrt[a] Sqrt[a] b 2 -1 - (-1 + Sqrt[a]) b > Re[----------------------] < 0 || Sqrt[a] b 2 2 -1 - (-1 + Sqrt[a]) b -1 - (-1 + Sqrt[a]) b > ((Re[----------------------] >= 4 || Re[----------------------] <= 0) && Sqrt[a] b Sqrt[a] b 2 2 1 + (-1 + Sqrt[a]) b 1 + (-1 + Sqrt[a]) b > (--------------------- \[NotElement] Reals || Re[---------------------] < -4)))] Sqrt[a] b Sqrt[a] b |

2楼2013-08-21 12:37:22













回复此楼
5