欢迎来到天天文库
浏览记录
ID:24297842
大小:68.60 KB
页数:4页
时间:2018-11-13
《数值计算上机程序》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、2.用下列方法求方程eAx+10x-2=0的近似根,要求误差不超过0.5*10e-3,并比较计算量1)在区间[0.,1]上用二分法。2)取初值xo=O并用迭代过程x=2-4.(k=0,l,2,……)A+1103)取初值x()=0用牛顿法。源程序:#include#definee2.71828usingnamespacestd;doublef(doublex){returnexp(x)+10*x-2;};voidEr()(doublea,b,d,A,B,C;intn,p;cout«"输入X0,XI:要求输入的X0=0,Xl=l”《endl;ci
2、n»a»b;d=b-a;C=l,n=0,p=2;whUe((C!=0)&&(d/p)>0.0001){A=f(a);B=f(b);C=f((a+b)/2);if(A>0&&C>0
3、
4、A<0&&C<0)a=(a+b)/2;elseif(B>0&&C>0
5、
6、B<0&&C<0)b=(a+b)/2;n++,p=p*2;cout«naH«n«n=n«a«n《’•bn«n«M=H«b«endl;}cout«"解为:"《(a+b)/2«endl;};doubleDiedai(){inti=l;doublex=0.0,y,x1=0.0;while(l)xl=x;y=2-exp(x);x=y/10;if(fa
7、bs(x-xl)<0.00001){cout<〈"笫n«i«’^迭代得:n«endl;cout<<"x"<
8、l;cout«"x"«i«',=M«xl«endl;break;)else00以《"第”<<1«"次迭代得:"《endl;cout«HxH«i«,-M«x1«endl;i++;)returnxl;};intmain(){cout«uf(x)=exp(x)+10*x-2的实根,准确到四位有效数字."《endl;cout«n请输入相应的选择序号:n«endl;cout«nl:对二分法解题.2:迭代法解题.3:Newton法解intN;while(cin»N)if(N==l)Er();}elseif(N==2){Diedai();}elseif(N==3)Newton();})return0;}
9、?iCpp3.cpp#include#include^definee2.71828usingnamespacestd;double^(doublex)returnexp(x)+10*x-2;>;uoidEr()doublea,b,d,A,B,C;intn,p;c0Ut«.
10、輸入X0,X1:要求输入的X0=0,X1=1-«endl;cin〉>a>>b;d=b-a;C=1,n=0,p=2;while((C?=8)&&(d/p)>0.0001)A=f(a);C=f((a+b)/2);if(A>0&&C〉0
11、
12、A
13、0&&C>0
14、
15、B<0&&C<0)b=(a+b)/2;n++,p=p*2;cout<<"a"<B«b«endl;运行结果:’F:学习:果程设计鐵值计^DebugCpp3.exe”f=exp+l0*x-2的实根,准确到四位有效数字-b雜M饔器扇择畀蠢k法解题.3:NeWtcm法解题一■输入X0,XI:要求输入的X0=0,XI=1bl=0.5b2=0.25b3=0.1255b4=0-1255b5=0.0937501al=0bl=0a2=0b2=0a3=0b3=0b6=0.09375b?=0.09375b8=0-09375b
16、9=0.0917969bl0=0.0908203bll=0.0908203bl2=0.0905762b!3=0.0905762a4=0.0625a5=0-0625a6=0.078125a?=0.0859375a8=0.0898438a9=0.0898438al0=0.0898438all=0.090332al2=0.090332al3=0.0904541解为:0-0905151#=#=829#=391#=12
此文档下载收益归作者所有