注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

徐小湛的博客

高等数学课件、函数图形动画、数学软件应用

 
 
 

日志

 
 

用Mathematica求第二类曲面积分  

2011-08-12 23:08:02|  分类: Mathematica |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

用Maple求第二类曲面积分 - calculus - 高等数学

 用Maple求第二类曲面积分 - calculus - 高等数学

 

用极坐标计算

P[x_, y_, z_] := z^2 + x; Q[x_, y_, z_] := 0; R[x_, y_, z_] := -z;
f[x_, y_] := (x^2 + y^2)/2
F[x_, y_, z_] := z - f[x, y];
A[x_, y_, z_] = {P[x, y, z], Q[x, y, z], R[x, y, z]}
n[x_, y_, z_] = -D[F[x, y, z], {{x, y, z}}]
B[x_, y_] = A[x, y, f[x, y]].n[x, y, f[x, y]]
t1 = 0; t2 = 2*Pi;
h := h;
r1 = 0; r2 = 2;
Jifen = Integrate[r*B[r*Cos[t], r*Sin[t]], {t, t1, t2}, {r, r1, r2}]

 

用Mathematica求第二类曲面积分 - calculus - 高等数学

 

 

 

用Maple求第二类曲面积分 - calculus - 高等数学

 用极坐标计算

P[x_, y_, z_] := x^2; Q[x_, y_, z_] := y^2; R[x_, y_, z_] := z^2;
f[x_, y_] := Sqrt[x^2 + y^2]
F[x_, y_, z_] := z - f[x, y];
A[x_, y_, z_] = {P[x, y, z], Q[x, y, z], R[x, y, z]}
n[x_, y_, z_] = -D[F[x, y, z], {{x, y, z}}]
B[x_, y_] = A[x, y, f[x, y]].n[x, y, f[x, y]]
t1 = 0; t2 = 2*Pi;
h := h;
r1 = 0; r2 = h;
Jifen = Integrate[r*B[r*Cos[t], r*Sin[t]], {t, t1, t2}, {r, r1, r2}]

 

用Mathematica求第二类曲面积分 - calculus - 高等数学
 

返回《用Mathematica做微积分》 http://xuxzmail.blog.163.com/blog/static/2513191620117693216134/

  评论这张
 
阅读(685)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2016