济南大学毕业论文
致 谢
历时将近两个月的时间终于将这篇论文写完,在论文的写作过程中遇到了无数的困难和障碍,都在同学和老师的帮助下度过了。尤其要强烈感谢王宣欣老师,她对我进行了无私的指导和帮助,不厌其烦的帮助进行论文的修改和改进。另外,在校图书馆查找资料的时候,图书馆的老师也给我提供了很多方面的支持与帮助。在此向帮助和指导过我的各位老师表示最中心的感谢!
感谢这篇论文所涉及到的各位学者。本文引用了数位学者的研究文献,如果没有各位学者的研究成果的帮助和启发,我将很难完成本篇论文的写作。
感谢我的同学和朋友,在我写论文的过程中给予我了很多你问素材,还在论文的撰写和排版灯过程中提供热情的帮助。
由于我的学术水平有限,所写论文难免有不足之处,恳请各位老师和学友批评和指正!
27 - -
济南大学毕业论文
附录
追赶法程序如下:
#include
double A[N][N]={{6,-1,0,0,0,0,0,0,0},{-1,6,-1,0,0,0,0,0,0},{0,-1,6,-1,0,0,0,0,0},{0,0,-1,6,-1,0,0,0,0},{0 ,0,0,-1,6,-1,0,0,0},{0,0,0,0,-1,6,-1,0,0},{0,0,0,0,0,-1,6,-1,0},{0,0,0,0,0,0,-1,6,-1},{0,0,0,0,0,0,0,-1,6}};b[N]={0.898922,1.709851,2.353408,2.766597,2.908972,2.766597,2.353408,1.709851,0.898922},m[9]; }
28 - -
int i;
A[0][1]=A[0][1]/A[0][0]; for(i=1;i A[i][i+1]=A[i][i+1]/(A[i][i]-A[i][i-1]*A[i-1][i]); for(i=1;i A[i][i]=A[i][i]-A[i][i-1]*A[i-1][i]; b[0]=b[0]/A[0][0]; for(i=1;i b[i]=(b[i]-A[i][i-1]*b[i-1])/A[i][i]; for(i=N-2;i>=0;i--) b[i]=b[i]-A[i][i+1]*b[i+1]; for(i=0;i printf(\for(i=0;i