计算方法实验三上机程序

《计算方法实验三上机程序》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、实验题二2.1简单迭代法：#include#include#definexO3.0#defineMAXREPT1000#defineEPSIE-6#defineG(x)pow(12*x+sin(x)-lzl-0/3)voidmain(){inti;doublex_k=xO,x_kl=xO;printf("kxk");tor(i=0;i

2、%d,,/x_kl,i);return;}x_k=x_kl;}printf("AFTER%drepeate,nosolved.",MAXREPT);}-d("43?2.2牛顿迭代法：#include#include#definexO3.0#defineMAXREPT1000#defineEPSIE-6//defineG(x)x-(x*x*x-sin(x)-12*x+l)/(x*x*3-cos(x)-12)voidmain(){inti;doublex_k=xO,x_kl=xO;printfC'kxkH);for(i=0

3、;iH

4、>AN丄心口"4—C.-▲□..--oxi33.414013.410133.41013WROOTISs«14IOUkH*r•”anykeytocontinueim.e

5、Me•erriIftCai?iTEEKBwaldxltbutFXia皿―i>FWutFdt：>SQL/2.3埃特金迭代：#include#includettdefinexO3.0//defineMAXREPT1000//defineEPSIE-6#defineG(x)(pow(x,3)-sin(x)+l)/12.0)voidmain(){inti;doublex_k=xO,x_kl=xO;doubley,z;printf(nkxkH);for(i=0;i

6、);y=G(x_k);z=G(y);x_kl=z-((z-y)*(z-y))/(z-2*y+x_k);if(fabs(x_kl-x_k)#include#definexO1.5#defineMAXREPT1000#defineEPSIE-

7、6#defineG(x)x-(pow(xz3)+pow(xz2)-3*x-3)/(3*pow(x,2)+2*x-3)voidmain(){inti;doublex_k=xO,x_kl=xO;printf("kxk");for(i=0;i

8、.",MAXREPT);3・2蹲器snc-udecsidio.hv#inc-ude〈math.hv芸efineMAXREPT1000//defineEPS1T6^definexo0/♦definexl1.5甘defineF(x)pow(x、3)+pow(x、2)-3*x-3voidmain()intijdoub-exlTxo、xlklHxlxlk2HO.O;doub-ey、zjpz.nwkxk=jfor(li'l7-MAXREPTT+)printf=%d%g・「ixJ<2ry£XJ<)；z耳(xlklrxlk2Hxlkl丄z*xlkl・xls、vy)；

9、if((f