常微分方程差分解法、入门、多解法 - 图文(7)

2019-02-16 17:31

济南大学毕业论文

致 谢

历时将近两个月的时间终于将这篇论文写完,在论文的写作过程中遇到了无数的困难和障碍,都在同学和老师的帮助下度过了。尤其要强烈感谢王宣欣老师,她对我进行了无私的指导和帮助,不厌其烦的帮助进行论文的修改和改进。另外,在校图书馆查找资料的时候,图书馆的老师也给我提供了很多方面的支持与帮助。在此向帮助和指导过我的各位老师表示最中心的感谢!

感谢这篇论文所涉及到的各位学者。本文引用了数位学者的研究文献,如果没有各位学者的研究成果的帮助和启发,我将很难完成本篇论文的写作。

感谢我的同学和朋友,在我写论文的过程中给予我了很多你问素材,还在论文的撰写和排版灯过程中提供热情的帮助。

由于我的学术水平有限,所写论文难免有不足之处,恳请各位老师和学友批评和指正!

27 - -

济南大学毕业论文

附录

追赶法程序如下:

#include #define N 9 main() {

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


常微分方程差分解法、入门、多解法 - 图文(7).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:最新人教版 小学五年级下册语文全册教案 第二学期全套教学设计

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: