实验十 用Mathematica计算重积分 实验目的: 掌握用Mathematica软件求函数重积分的语句和方法。 实验过程与要求: 教师利用多媒体组织教学,边讲边操作示范。 实验的内容: 在Mathematica系统中与求一元函数定积分类似用Integrate函数计算重积分，基本格式为： Integrate [f,?{x,xmin,xmax}，{y,ymin,ymax}] 实验 计算二重积分 解 In[1]:=Clear[x,y] In[2]:=Integrate[x*Exp[x*y],{x,0,1},{y,-1,0}] Out[2]= 实验 计算二重积分 解 In[3]:=Clear[x,y] In[4]:=Integrate[x^2*y,{x,1,2},{y,1,x}] Out[4]= 实验  解 In[5]:=Clear[x,y] In[6]:=Integrate[Exp[x+y],{x,0,1},{y,0,1-x}]+ Integrate[Exp[x+y],{x,-1,0},{y,0,1+x}]+ Integrate[Exp[x+y],{x,-1,0},{y,-1-x,0}]+ Integrate[Exp[x+y],{x,0,1},{y,-1+x,0}] Out[6]= 实验