已阅读5页,还剩3页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
西华大学计算机系学生上机实践报告 计算机学院上机实践报告课程名称:数值计算方法B年级:上机实践成绩:指导教师:姓名:上机实践名称:非线性方程求根问题学号:上机实践日期:上机实践编号上机实践时间:一、目的1通过本实验,帮助加深对非线性方程求根方法的构造过程的理解;2能将各种方法编写为程序并上机实现;3比较各种方法在求解同一非线性方程根时,在收敛情况上的差异。二、内容与设计思想1用二分法求方程f(x)=x3-2x-5=0在区间2 , 3内的根。2方程f(x)=2x3-5x2-19x+42=0在x=3.0附近有根,试写出其三种不同的等价形式以构成三种不同的迭代格式,再用简单迭代法求根,观察这三种迭代是否收敛。三、使用环境1. 硬件环境微型计算机(Intel x86系列CPU)一台2. 软件环境Windows2000/XP操作系统VC+6.0或其它的开发工具。四、核心代码及调试过程1用二分法求方程f(x)=x3-2x-5=0在区间2 , 3内的根主要代码:void bisect(double a,double b,int max_B) double root, ya,yb,yroot;int i,actual_B;ya=f(a);yb=f(b);if(ya*yb0) printf(method failed!n);exit(0); for(i=1;i0) /取含根区间为a,(a+b)/2 b=root;yb=yroot;Else /取含根区间为(a+b)/2,b a=root;ya=yroot;if(fabs(b-a)EPS) break; root=(a+b)/2; yroot=f(root); actual_B=i;printf(root=%10.6lftf(root)=%10.6etatual_B=%dn,root,yroot,actual_B); 结果:2迭代格式分别为:x=2/19*x*x*x-5/19*x*x+42/19x=sqrt(2/5*x*x*x-19/5*x+42/5);x=(5/2*x*x+19/2*x-21)(1/3) 主要代码:double g(double x)return(pow(2.0/19.0*x*x*x-5/19*x*x+42/19),1.0); /*定义迭代函数*/void iterate(double a,double b,double x0,int max_D)int k=1;double x1;while(k=max_D)x1=g(x0); /*迭代计算*/if(x1b)printf(re_select a proper initial value x0!n);exit(0);if(fabs(x1-x0)max_D)printf(method failed!n);int main() double a=2.0,b=3.0,x0=(a+b)/2.0;int max_D=50;iterate(a,b,x0,max_D);前两种迭代结果:第三种:输入数据时应注意数据的类型,否则程序会报错。五、总结1、两道题结果值均是7为有效数字,精度较高,计算次数较少。2、写程序时应注意数字的类型。六、附录代码:11#include#include#include#define EPS 0.000001double f(double x)return(x*x*x-2*x-5);void bisect(double a,double b,int max_B)double root, ya,yb,yroot;int i,actual_B;ya=f(a);yb=f(b);if(ya*yb0)printf(method failed!n);exit(0);for(i=1;i0) b=root;yb=yroot;else a=root;ya=yroot;if(fabs(b-a)EPS) break;root=(a+b)/2; yroot=f(root); actual_B=i;printf(root=%10.6lftf(root)=%10.6etatual_B=%dn,root,yroot,actual_B); int main() double a=2,b=3; int max_B=50; bisect(a, b,max_B);return 0; 12#include#include#include#define EPS 0.00001double g(double x)return(pow(5.0/2.0*x*x+19.0/2.0*x-21.0),1.0/3.0);void iterate(double a,double b,double x0,int max_D)int k=1;double x1;while(k=max_D)x1=g(x0);if(x1b)printf(re_select a proper initial value x0!n);exit(0);if(fabs(x1-x0)max_D)printf(method failed!n);int main()double a=2.0,b=4.0,x0=(a+b)/2.0;int max_D=50;iterate(a,b,x0,max_D);21#include#include#include#define EPS 0.00001double g(double x)return(pow(2.0/5.0*x*x*x-19.0/5.0*x+42/5),1.0/2.0);void iterate(double a,double b,double x0,int max_D)int k=1;double x1;while(k=max_D)x1=g(x0);if(x1b)printf(re_select a proper initial value x0!n);exit(0);if(fabs(x1-x0)max_D)printf(method failed!n);int main()double a=2.0,b=4.0,x0=(a+b)/2.0;int max_D=50;iterate(a,b,x0,max_D);22#include#include#include#define EPS 0.00001double g(double x)return(pow(2.0/19.0*x*x*x-5.0/19.0*x*x+42.0/19.0),1.0);void iterate(double a,double b,double x0,int max_D)int k=1;double x1;while(k=max_D)x1=g(x0);if(x1b)printf(re_select a proper initial valu
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025年安全生产消防安全应急处置案例分析试题(附答案)
- 2025年中学地理课堂教学评价细则方案
- 2025年食品生产与质量控制知识考试试题及答案
- 小学心理健康培训
- 美育课程方案撰写实例与教学实践
- 学校运营管理培训
- 多次储存式自体血回输对肝癌患者围手术期免疫功能影响的深度剖析
- 多模态影像学技术在胃癌术前分期中的效能评估与临床应用探索
- 患者为中心医疗服务改进方案
- 四年级语文作文辅导与训练指导
- 学术交流英语知到章节答案智慧树2023年哈尔滨工程大学
- 越冬维护监理实施细则
- JJF 1915-2021 倾角仪校准规范
- 部编九下语文9 《鱼我所欲也》课后习题参考答案
- 优质课-中国的农业
- 德国格屋集团提升推拉和推拉窗五金系统介绍
- GB/T 12668.4-2006调速电气传动系统第4部分:一般要求交流电压1000V以上但不超过35kV的交流调速电气传动系统额定值的规定
- FZ/T 52052-2018低熔点聚酯(LMPET)/再生聚酯(RPET)复合短纤维
- CB/T 466-1995法兰铸钢闸阀
- (更新版)中国移动政企行业认证题库大全-下(判断题汇总)
- 项目部级安全教育考试题及答案
评论
0/150
提交评论