資源描述:
《新企業(yè)會(huì)計(jì)準(zhǔn)則轉(zhuǎn)換與銜接提綱》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、工科高等數(shù)學(xué)下冊實(shí)驗(yàn)東北農(nóng)業(yè)大學(xué)信息與計(jì)算科學(xué)系實(shí)驗(yàn)三1.運(yùn)用Mathematica計(jì)算二重積分和三重積分。2.運(yùn)用Mathematica求立體的體積及曲面的面積。3.運(yùn)用Mathematica計(jì)算曲線積分和曲面積分。4.繪制空間曲面的交線。二重積分格式Integrate[f[x,y],{x,x1,x2},{y,y1,y2}]例1求例2求,其中為曲線所圍區(qū)域。In[]:=Integrate[x^2*y,{x,1,4},{y,0,Log[x]}]Out[]=In[]:=Plot[{x^2,Sqrt[x]},{x,0,2},PlotRange→{-1,2},AspectRatio→1]In[]
2、:=Integrate[x*y,{x,0,1},{y,x^2,Sqrt[x]}]Out[]=三重積分格式Integrate[f[x,y,z],{x,x1,x2},{y,y1,y2},{z,z1,z2}]例3求,其中為,,所圍區(qū)域。In[]:=c1=Plot3D[-y^2/2,{x,-10,10},{y,-10,10},Shading→False]In[]:=c2=ParametricPlot3D[{x,(4-2x)/3,z},{x,-10,10},{z,-10,0},Shading→False]In[]:=c3=ParametricPlot3D[{0,y,z},{y,-10,10},{z,
3、-10,0},Shading→False]In[]:=Show[c1,c2,c3]In[]:=Clear[x,y,z]In[]:=Plot[(4-2x)/3,{x,-10,10}]In[]:=Solve[(4-2x)/3==0,x]In[]:=Integrate[x+2y+3z,{x,0,2},{y,0,(4-2x)/3},{z,-y^2/2,0}]Out[]=Out[]=立體體積例4求由曲面及所圍成的立體的體積。In[]:=a1=ParametricPlot3D[{u*Sin[v],u*Cos[v]/Sqrt[2],u^2},{u,0,2},{v,0,2Pi}]In[]:=a2=Para
4、metricPlot3D[{u*Sin[v]/Sqrt[2],u*Cos[v],6-u^2},{u,0,2},{v,0,2Pi}]In[]:=Show[a1,a2]In[]:=z1=x^2+2y^2;z2=6-2x^2-y^2;Simplify[z2-z1==0]Out[]=In[]:=x=r*Cos[t];y=r*Sin[t];V=Integrate[(z2-z1)*r,{t,0,2Pi},{r,0,Sqrt[2]}]Out[]=曲面的面積例5求球面含在圓柱面內(nèi)的那部分的曲面的面積。In[]:=b1=ParametricPlot3D[{2Sin[u]*Cos[v],2Sin[u]*Sin
5、[v]/Sqrt[2],2Cos[u]},{u,0,Pi},{v,0,2Pi}]In[]:=b2=ParametricPlot3D[{1+Cos[u],Sin[u],v},{u,0,2Pi},{v,-2,2}]In[]:=Show[b1,b2]In[]:=Clear[x,y,r,t];z=Sqrt[4-x^2-y^2];ds=Sqrt[1+D[z,x]^2+D[z,y]^2];x=r*Cos[t];y=r*Sin[t];Integrate[4ds*r,{t,0,Pi/2},{r,0,2Cos[t]}]Out[]=演示實(shí)驗(yàn)例6利用二重積分的概念,從圖形的角度理解,其中。曲線積分(轉(zhuǎn)化為定積分
6、)格式Integrate[f[x],{x,xmin,xmax}]例7計(jì)算曲線積分,其中是中心在,半徑為的上半圓周。解:的直角坐標(biāo)方程為,其中In[]:=y[x_]:=Sqrt[2x-x^2];dy[x_]:=D[y[x],x];Integrate[(x^2+y[x]^2)*Sqrt[1+dy[x]^2],{x,0,2}]Out[]=例8計(jì)算曲線積分,其中是拋物線上從到的一段弧。例9利用曲線積分求星形線,所圍圖形的面積。解:取In[]:=Integrate[2*y^2*y*2y+y^4,{y,0,1}]Out[]=In[]:=ParametricPlot[{Cos[t]^3,Sin[t]^3
7、},{t,0,2Pi},AspectRatio→Automatic]利用公式計(jì)算面積。In[]:=Clear[x,y,dx,dy];x[t_]:=a*Cos[t]^3;y[t_]:=a*Sin[t]^3;dx=D[x[t],t];dy=D[y[t],t];s[t_]:=(1/2)*(x[t]*dy-y[t]*dx);Integrate[s[t],{t,0,2Pi}]Out[]=空間曲面的交線例10繪制球面與柱面的交線。解