数学应用软件试卷.docVIP

1.(10分)设银行的利率为2.25%.将3000元存入银行, 编程求多长时间连本带利翻一翻。 2.(10分)编程求不超过5000的偶数之和与奇数之和。 3.(10分)已知:f[0]=1;f[1]=2,f[n]=3f[n-1]+5f[n-2], 编程求f[200]。 4.(15分) 编程将下面二次型通过正交变换化为标准型。 f(x1,x2,x3,x4)=2x1x2+2x1x3-2x1x4-2x2x3+2x2x4+2x3x4 5.(15分)已知三角形三顶点为(0,0),(0.5,1),(1,-1),写出使三角形进行旋转的程序。 6.(5分) 编程求下列方程组的通解 7.(15分)给出如下数据： {{1，1},{2，4},{3，9},{4，16},{5，25}} (1)、根据所给数据，构造近似函数； (2)、根据所给数据，构造数据的多项式的精确拟合； (3)、根据所给数据进行线性拟合； (4)、根据所给数据进行数据的二次线性拟合； (5)、把两次拟合的图形与原图形进行比较； 答案: 8.(10分) 用三种不同的方法分别画一个圆圈,一个为红色,一个为绿色,一个为蓝色，并排在同一行。 答案: 9.(10分)假设某水果生主基地,香蕉的产量为100吨,苹果的产量为200吨,樱桃的产量为20吨,葡萄的产量为500吨,试根据不同水果的产量画出长条图和圆饼图. 数学应用软件》考试卷解答 1.答案: money=3000; years=0; While [money6000,years=years+1;money=money*(1+2.25/100)]; years money 2.答案: oushuhe=0; jishuhe=0; i=0; Do[i=i+1;If [EvenQ[i],oushuhe=oushuhe+i,jishuhe=jishuhe+i],{5000}]; oushuhe jishuhe 3.答案: f[0]=1;f[1]=2;f[n_]:=3f[n-1]+5f[n-2]; f[200] 4.答案: f[a_]:={{Cos[a],-Sin[a]},{Sin[a],Cos[a]}} Animate[Graphics[Line[{{0,0}.f[xPi/16],{0.5,1}.f[xPi/16],{1,1}.f[xPi/16],{0,0}.f[xPi/16]}],AspectRatio-1, PlotRange-{{-2,2},{-2,2}}]],{x,0,100}] 5.答案: data = Table[{y, y2}, {y, 1, 5}] t1=Interpolation[data] t2=InterpolatingPolynomial[data,x] t3=Fit[data,{1,x},x] t4=Fit[data,{1,x,x^2},x] p1=ListPlot[data];p2=Plot[t3,{x,1,5}];p3=Plot[t4,{x,1,5}]Show[p1,p2,p3] 6.答案: tu1=Plot[{,{x,-1,1},PlotStyle-RGBColor[1,0,0]] tu2=ParametricPlot[{Sin[t],Cos[t]},{t,0,2Pi},PlotStyle-RGBColor[0,1,0]] tu3= Graphics[{RGBColor[0,0,1],Circle[{0,0},1]}] tu4=Show[GraphicsArray[{tu1,tu2,tu3}] 7.答案: BarChart[{100,200,20,500},ChartLabels-{香蕉,苹果,樱桃,葡萄}] PieChart[{100,200,20,500},ChartLabels-{香蕉,苹果,樱桃,葡萄}] 1