实验1 多元函数微分学(基础实验)指导书.docVIP

附录Ⅰ 大学数学实验指导书 项目三 多元函数微积分 实验1 多元函数微分学（基础实验） 实验目的 掌握利用Mathematica计算多元函数偏导数和全微分的方法, 掌握计算二元 函数极值和条件极值的方法. 理解和掌握曲面的切平面的作法. 通过作图和观察, 理解二元 函数的性质、方向导数、梯度和等高线的概念. 求多元函数的偏导数与全微分 例1.1 (教材 例1.1) 设求 输入 Clear[z]; z=Sin[x*y]+Cos[x*y]^2; D[z,x] D[z,y] D[z,{x,2}] D[z,x,y] 则输出所求结果. 例1.2 设求和全微分dz. 输入 Clear[z];z=(1+x*y)^y; D[z,x] D[z,y] 则有输出 再输入 Dt[z] 则得到输出 例1.3 (教材 例1.2) 设其中a是常数, 求dz. 输入 Clear[z,a];z=(a+x*y)^y; wf=Dt[z,Constants-{a}]//Simplify 则输出结果: (a+xy)-1+y(y2Dt[x,Constants-{a}]+ Dt[y,Constants-{a}](xy+(a+xy)Log[a+xy])) 其中Dt[x,Constants-{a}]就是dx, Dt[y,Constants-{a}]就是dy. 可以用代换命令“/.”把它们 换掉. 输入 wf/.{Dt[