实验九用Mathematica软件求函数