数值分析龙贝格算法.doc_第1页
数值分析龙贝格算法.doc_第2页
数值分析龙贝格算法.doc_第3页
数值分析龙贝格算法.doc_第4页
数值分析龙贝格算法.doc_第5页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

数值分析课程设计报告 龙贝格算法 专 业： 班 级： 学 号： 姓 名： 1.实验目的运用龙贝格求积公式，编制龙贝格算法程序，计算积分的近似值，要求误差小于。2.程序流程图 开始 输入a,b,e b-a-h,h/2f(a)+f(b)-T1,1-k 0-s,a+h/2-x s+f(x)-s x+h-x xb T2 T2+1/3(T2-T1)-S2k+1-k,h/2-hT2-T1,S2-S1 k=1 = S2+1/15(S2-S1)-C2 C2-C1 k=2 = C2+1/63(C2-C1)-R2 k=3 R2-R1 输出a,b,R2 |R2-R1|e 结束 3. 程序代码#include stdio.h#include math.hint main(void) float f(float);float a,b,e,h,T1=0,T2=0,S1=0,S2=0,C1=0,C2=0,R1=0,R2=0,k,s,x;int i=0; printf(请输入积分的下限：);scanf(%f,&a);printf(n请输入积分的上限：);scanf(%f,&b);printf(n请输入允许误差：);scanf(%f,&e);k=1;h=b-a; T1=h*(f(a)+f(b)/2; printf(-n);printf(k T2 S2 C2 R2n);printf(%d %10.7f %10.7f %10.7f %10.7fn,i,T1,S1,C1,R1);do s=0;x=a+h/2;while(xb) s+=f(x);x+=h;T2=T1/2+s*h/2;S2=T2+(T2-T1)/3;if (k=1)k=k+1;h=h/2;T1=T2;S1=S2;else if (k=2)C2=S2+(S2-S1)/15;C1=C2;k=k+1;h=h/2;T1=T2;S1=S2;else if (k=3)R2=C2+(C2-C1)/63;C2=S2+(S2-S1)/15;C1=C2;k=k+1;h=h/2;T1=T2;S1=S2;elseC2=S2+(S2-S1)/15;R2=C2+(C2-C1)/63;if (fabs(R2-R1)e)printf(%d %10.7f %10.7f %10.7f %10.7fn,i+1,T2,S2,C2,R2);break;elseR1=R2;C1=C2;k=k+1;h=h/2;T1=T2;S1=S2; i+;printf(%d %10.7f %10.7f %10.7f %10.7fn,i,T2,S2,C2,R2);while (1);return 0;float f(float x)/*float y=0;if(x=0.0)return 1; y=(float)s
人人文库> 全部分类> 教育资料 > 课设设计

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论