《数值分析》上机实验报告.docx

《《数值分析》上机实验报告.docx》由会员分享，可在线阅读，更多相关《《数值分析》上机实验报告.docx（26页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、第 1 页 共 26 页数值分析上机实验报告1.用 Newton法求方程X7-X4+14=0在（0.1，1.9）中的近似根（初始近似值取为区间端点，迭代 6次或误差小于 0.00001） 。1.1 理论依据：设函数在有限区间a，b上二阶导数存在，且满足条件 上 的 惟 一 解在 区 间平 方 收 敛 于 方 程所 生 的 迭 代 序 列 迭 代 过 程由则 对 任 意 初 始 近 似 值 达 到 的 一 个中 使是其 中上 不 变 号在 区 间 ,0)(3,210,)()(x|)(,(|,|,)(|)(|.4;03,.2)(10 . baxfxkfx Newtonbabfamircfabcfx

2、bfkkk 令 0)9.1(. 0)8(423642)( 16779.,.,83564 ff xxxf ff故以 1.9为起点 9.1)(0xfkk如此一次一次的迭代，逼近x的真实根。当前后两个的差#includemain()double x2,f,f1;double x1=1.9; /取初值为 1.9dox2=x1;f=pow(x2,7)-28*pow(x2,4)+14;f1=7*pow(x2,6)-4*28*pow(x2,3);x1=x2-f/f1; while(fabs(x1-x2)=0.00001|x1 x0=1.9; eps=0.00001; M=100; x=Newton(f,df

3、,x0,eps,M); vpa(x,7)1.5 问题讨论：1.使用此方法求方解，用误差来控制循环迭代次数，可以在误差允许的范围内得到比较理想的计算结果。此程序的不足之处是，所要求解的方程必须满足上述定理的四个条件，但是第二和第四个条件在计算机上比较难以实现。2.Newton迭代法是一个二阶收敛迭代式，他的几何意义 Xi+1是 Xi的切线与 x轴的交点,故也称为切线法。它是平方收敛的，但它是局部收敛的，即要求初始值与方程的根充分接近，所以在计算过程中需要先确定初始值。3.本题在理论依据部分，讨论了区间(0.1,1.9)两端点是否能作为 Newton迭代的初值，结果发现 0.1不满足条件，而 1.

4、9满足，能作为初值。另外，该程序简单，只有一个循环，且为顺序结构，故采用 do-while循环。当然也可以选择 for和 while循环。第 5 页 共 26 页2.已知函数值如下表：x 1 2 3 4 5f(x) 0 0.69314718 1.0986123 1.3862944 1.6094378x 6 7 8 9 10f(x) 1.7917595 1.9459101 2.079445 2.1972246 2.3025851f(x) f(1)=1 f(10)=0.1试用三次样条插值求 f(4.563)及 f(4.563)的近似值。2.1 理论依据 332211111 1()()() ()()

5、(6666j j jj jjj j j jxxhxhxSMyMyMhh 这里 ，所以只要求出 ，就能得出插值函数 S（x） 。11jjj j求 的方法为：jM01112211NNNdMd 这里100 11111 16()(,21)(jjjjjjNNNj jj jjydhyjhh 最终归结为求解一个三对角阵的解。第 6 页 共 26 页用追赶法解三对角阵的方法如下： 11221 221 11n nnbcalA LUbcla 1,nLdUx Ld即 若 记 则 由 得， 121nnlld 111nnx 综上可得求解方程 Ax=d的算法： 111 111,23,2ii iiiiiiniiibdlbl

6、clncxx 2.2 C语言程序代码：#include#includevoid main()int i,j,m,n,k,p;double q10,p10,s4,g4,x0,x1,g0=1,g9=0.1;double s1010;第 7 页 共 26 页double a10,b10,c10,d10,e10,x10,h9,u9,r9;double f10=0,0.69314718,1.0986123,1.3862944,1.6094378,1.7917595,1.9459101,2.079445,2.1972246,2.3025851;printf(“请依次输入 xi:n“);for(i=0;i=

7、1;i-)xi-1=(bi-1-si-1i*xi)/ai-1;printf(“M%d=%lfn“,i,xi-1);printf(“可得 s(x)在区间4,5上的表达式;n“);printf(“将 x=4.563代入得：n“);第 9 页 共 26 页x0=5-4.563;x1=4.563-4;s4=x3*pow(x0,3)/6+x4*pow(x1,3)/6+(f3-x3/6)*(5-4.563)+(f4-x4/6)*(4.563-4);g4=-x3*pow(x0,2)/2+x4*pow(x1,2)/2-(f3-x3/6)+(f4-x4/6);printf(“计算结果：f(4.563)的函数值是

8、：%lfnf(4.563)的导数值是：%lfn“,s4,g4);2.3 运行结果：2.4 问题讨论1. 三次样条插值效果比 Lagrange插值好，没有 Runge现象，光滑性较好。2. 本题的对任意划分的三弯矩插值法可以解决非等距节点的一般性问题。3. 编程过程中由于定义的数组比较多，需要仔细弄清楚各数组所代表的参数，要注意各下标代表的含义，特别是在用追赶法计算的过程中。第 10 页 共 26 页3.用 Romberg算法求 .)01.(sin)75(3214. 允 许 误 差dxx3.1 理论依据：Romberg算法的计算步骤如下：（1）先求出按梯形公式所得的积分值 (0)1()2baTf

9、b（2）把区间 2等分，求出两个小梯形面积之和，记为 ，即(1)T(1)()()42babaTff这样由外推法可得 , 。(0)2T(1)2(0)(1)(0)1() 4T（3）把区间再等分（即 等分） ，得复化梯形公式 ，由 与 外推2 (2)1T(1)(2)T可得 ， ，如此，若已算出 等分的复化梯形(2)(1)(1)24T(1)(0)(0)234Tk公式 ，则由 Richardson外推法，构造新序列()1k， m=1,2,l, k=1,2,l-m+1,()(1)(1)4mkkT最后求得 。(0)1l（4） 或 就停止计算，否则回到（3） ，计算 ，(0)()1llT(0)()1|llT (1)lT一般可用如下算法：