艾特肯加速法(steffensen方法)

《艾特肯加速法(steffensen方法)》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、#include#include#includeusingnamespacestd;doublef(double);main(){/*doublex1=double(0.000000000);doublex2=double(0.000000000);doublex3=double(0.000000000);doublex4=double(0.000000000);doublec=double(0.000000000);doubleb=double(0.000000000);doublee=double(0.0

2、00001);//cout<<"Enterthex1:"<>x1;//cout<<"Enterthee:"<>e;x1=0;//兩端點之一x2=1;//兩端點之一x3=x2-F(x2)/((F(x2)-F(x1))/(x2-x1));if(x2>x3)x4=x2-x3;elsex4=x3-x2;cout<e){x1=x2;x2=x3;x3=x2-F(x2)/((F(x2)-F(x1))/(x2-x1));cout<<

3、x1<x3)x4=x2-x3;elsex4=x3-x2;}*/doublex1=double(0.000000000);doublex2=double(0.000000000);doublex3=double(0.000000000);doubley=double(0.000000000);doublez=double(0.000000000);doublee=double(0.000000001);cout<<"Enterthex1:"<>x1;y=f(x

4、1);z=f(y);x2=x1-(pow((y-x1),2)/(z-2*y+x1));if(x1>x2)x3=x1-x2;elsex3=x2-x1;cout<e){x1=x2;cout<x2)x3=x1-x2;elsex3=x2-x1;cout<

5、sultis:"<