數(shù)值分析-迭代法-資料下載頁(yè)
2025-06-17 06:50本頁(yè)面
【正文】 上題。include include iostreaminclude include define N 100define EPS 1e6define ETA 1e8void main(){ float f(float)。 float f1(float)。 float x0,x1,y0。 float xianjie(float (*)(float),float (*)(float),float,float)。 printf(請(qǐng)輸入兩個(gè)初始值x0,x1(逗號(hào)隔開(kāi))\n)。 scanf(%f,%f,amp。x0,amp。x1)。 printf(x(0)=%f ,x(1)=%f \n,x0,x1)。 y0=xianjie(f,f1,x0,x1)。 printf(\n方程的根為x=%f \n,y0)。}float xianjie(float (*f)(float),float (*f1)(float),float x0,float x1){ float x2,d。 int k=0。 do { x2=x1(x1x0)*f(x1)/(f(x1)f(x0))。 if((k++N)||(fabs(f1(x2))EPS)) { printf(\n弦截法錯(cuò)誤。)。 exit(0)。 } d=(fabs(x2)1?x2x1:(x2x1)/x2)。 x0=x1。 x1=x2。 printf(x(%d)=%f,x(%d)=%f\n,k,x0,k+1,x1)。 }while(fabs(d)EPSamp。amp。fabs(f(x2))ETA)。 return x2。}float f(float x){ return x*exp(x)1。}float f1(float x){ return exp(x)+x*exp(x)。}程序運(yùn)行結(jié)果如下：請(qǐng)輸入兩個(gè)初始值x0,x1(逗號(hào)隔開(kāi))1,x(0)= ,x(1)=x(1)=,x(2)=x(2)=,x(3)=x(3)=,x(4)=x(4)=,x(5)=x(5)=,x(6)=方程的根為x=Press any key to continu
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1