高等数学：习题解答 26 二重积分的计算（1）（153-154页） .pptVIP

* 二重积分的计算（1） 2013.4.10 with(plots):a:=1: f:=x-sqrt(2*a*x-x^2):g:=x-sqrt(2*a*x): quxian1:=spacecurve([a+a*cos(t),a*sin(t),0],t=0..Pi,color=red,thickness=4): quxian2:=spacecurve([x,g(x),0],x=0..2*a+0.2,color=blue,thickness=4): quyu:=plot3d([x,y,0],x=0..2*a,y=f(x)..g(x),color=green,style=patchnogrid): display(quxian1,quxian2,quyu,orientation=[270,0],axes=normal,tickmarks=[0,0,0]); with(plots):a:=1: f:=y-y^2/(2*a):g:=y-a-sqrt(a^2-y^2): quxian1:=spacecurve([f(y),y,0],y=0..a,color=red,thickness=3): quxian2:=spacecurve([g(y),y,0],y=0..a,color=blue,thickness=3): quyu:=plot3d([x,y,0],x=f(y)..g(y),y=0..