- 60
- 0
- 约2.49千字
- 约 8页
- 2017-10-19 发布于江西
- 举报
熟悉用二分法,迭代法,牛顿法和弦截法求解非线性方程。
实验报告
学院(系)名称:计算机与通信工程
姓名 赵云鹏 学号专业 计算机科学与技术 班级 09-1 实验项目 实验一 方程求根 课程名称 数值计算方法 课程代码 实验时间 2011年5月26日 实验地点 #7-215 批改意见:实验目的:熟悉用二分法,迭代法,牛顿法和弦截法求解非线性方程。
实验环境:硬件环境:IBM-PC或兼容机
软件环境:Windows操作系统
编程语言:C语言
实验内容:
1、用二分法求方程x2-x-1=0的正根,要求准确到小数点后第一位
2用迭代法和牛顿法求解方程x=e-x在x=0.5附近的一个根,要求精确到小数点后三位
3用双点弦截法求方程x3+3x2-x-9=0在区间[1,2]内的一个实根,精确到五位有效数字。
成绩 教师签字: 实验步骤:二分法:
迭代法:
牛顿法:
双点弦截法:
用二分法求方程x2-x-1=0的正根,要求准确到小数点后第一位
#include stdio.h
#include math.h
#define ADJUST1 0.01
#define ADJUST2 0.001
#define EX 0.000001
#define INF 999999999.99
double func1(double x)//二分法求的方程
{
return (x*x-x-1);
}
double func2_1(double x)//迭代法的方程
{
return exp(-x);
}
double res1(double a,double b,double (*fun1)(double x))//二分法
{
double fa=fun1(a);
double fb=fun1(b);
double fmid=fun1((a+b)/2);
while(fabs(b-a)=ADJUST1)
{
if(fabs(fmid-0a)EX)
return fmid;
else if(fmid*fa0)
{
b=(a+b)/2;
fa=fun1(a);
fb=fun1(b);
fmid=fun1((a+b)/2);
}
else if(fmid*fb0)
{
a=(a+b)/2;
fa=fun1(a);
fb=fun1(b);
fmid=fun1((a+b)/2);
}
}
return (a+b)/2;
}
int main()
{
printf(%.2f\n,res1(0,100,func1));
printf(%.2f\n,func2_1(-1));
return 0;
}
用迭代法和牛顿法求解方程x=e-x在x=0.5附近的一个根,要求精确到小数点后三位
#include stdio.h
#include math.h
#define ADJUST1 0.01
#define ADJUST2 0.001
#define EX 0.000001
#define INF 999999999.99
double func2_1(double x)//迭代法的方程
{
return exp(-x);
}
double res2(double x0,double e,int n,double (*fun)(double x))//迭代法,迭代失败标志,输出Fail!,并返回INF
{
int k=1;
double x1;
x1=fun(x0);
while(k!=n)
{
if(fabs(x1-x0)e)
return x1;
x0=x1;
x1=fun(x0);
k++;
}
if(k==n)
printf(Fail!\n);
return INF;
}
int main()
{
printf(%.3f\n,res2(0.5,0.001,100,func2_1));//q2.1
printf(%.3f\n,func2_1(0.567));//for test
return 0;
}
用双点弦截法求方程x3+3x2-x-9=0在区间[1,2]内的一个实根,精确到五位有效数字
#include stdio.h
#include math.h
#define ADJUST1 0.01
#define ADJUST2 0.001
#define EX 0.000001
#define INF 999999999.99
double dfunc2_2(double x)//牛顿法方程导数
{
return (0-exp(-x)-1);
}
double func2_2(double x)//牛顿
您可能关注的文档
- 河南省军顺置业有限公司西湖金岸经济适用住房小区项目环境影响.doc
- 河南省地税系统办税服务厅人员业务技能考试试题(三).doc
- 河南省教改课题申报书填写技巧.doc
- 河南省残疾人小康建设状况调查问卷.doc
- 河南省民办职业培训学校章程范本doc76.doc
- 河南省道路运输企业质量信誉考核申请表.doc
- 河南省长线局水源热泵系统运行费用分析.doc
- 河南省雨露计划培训基地准入.doc
- 河南省高级技师职业资格考评申报表11.doc
- 河塘中心幼儿园中班教研组活动记录38.doc
- 小区绿化施工协议书.docx
- 墙面施工协议书.docx
- 1 古诗二首(课件)--2025-2026学年统编版语文二年级下册.pptx
- (2026春新版)部编版八年级道德与法治下册《3.1《公民基本权利》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《4.3《依法履行义务》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《6.2《按劳分配为主体、多种分配方式并存》PPT课件.pptx
- (2026春新版)部编版八年级道德与法治下册《6.1《公有制为主体、多种所有制经济共同发展》PPT课件.pptx
- 初三教学管理交流发言稿.docx
- 小学生课外阅读总结.docx
- 餐饮门店夜经济运营的社会责任报告(夜间贡献)撰写流程试题库及答案.doc
原创力文档

文档评论(0)