下載本文檔
版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡介
1、黃金分割法的C語言程序應(yīng)用#include #include #define e 0.001 (給定收斂精度e=0.001)float f(float x)float y=pow(x,2)+2*x; (我們需要求解的目標(biāo)函數(shù):)return(y);main() (主函數(shù))float a=-3,b=5; (給定初始單峰區(qū)間 a, b)float x1,x2,f1,f2,c,min;x1=a+0.382*(b-a); (在區(qū)間 a, b內(nèi)取兩個(gè)內(nèi)插點(diǎn)x1和x2并計(jì)算其函數(shù)值)x2=a+0.618*(b-a);f1=f(x1);f2=f(x2);printf(n %f %f,a,b); while(
2、b-a)e) (當(dāng)新的b-ae=0.001時(shí),就執(zhí)行下列這些運(yùn)算)if (f1f2)(若 f1 f2 ,則取a,x2為新區(qū)間,而x1則作為新區(qū)間內(nèi)的第一個(gè)試算點(diǎn),即令b=x2,x2=x1,f2=f1,而另一試算點(diǎn)可按x1=a+0.382*(b-a)算出)b=x2; x2=x1;x1=a+0.382*(b-a);f2=f1;f1=f(x1);else (若 f1 f2 ,則取x1,b為新區(qū)間,而x2則作為新區(qū)間內(nèi)的第一個(gè)試算點(diǎn),即令a=x1,x1=x2,f1=f2,而另一試算點(diǎn)可按x2=a+0.618*(b-a)算出)a=x1;x1=x2;x2=a+0.618*(b-a);f1=f2;f2=f(
3、x2);printf(n %f %f,a,b); c=(a+b)/2; min=f(c);printf(n The area is %f to %f,a,b); printf(n The min is %f and the result is %f,c,min);二次插值法的C語言程序應(yīng)用#include#include double f(double x) return x*x*x-3*x+2;void main(void) double a1,a2,a3,a0; double f1,f2,f3,f0; double q=0.; (給定計(jì)算精度q=0.) int k=1; a1=0; (給定
4、初始搜索區(qū)間【a1,a3】) a3=3; a2= 0.5*(a1+a3); (采用等距原則取點(diǎn)) f1=f(a1); (計(jì)算三點(diǎn)的函數(shù)值) f2=f(a2); f3=f(a3); while(1) a0=0.5*(a2*a2-a3*a3)*f1+(a3*a3-a1*a1)*f2+(a1*a1-a2*a2)*f3)/(a2-a3)*f1+(a3-a1)*f2+(a1-a2)*f3); (計(jì)算插值函數(shù)的極小點(diǎn)a0) f0=f(a0); (計(jì)算極小值f0) if(fabs(a0-a2)a2) (用進(jìn)退法確定搜索區(qū)間) if(f0=f2) (進(jìn)一步縮小區(qū)間,以得到新的單峰區(qū)間) a1=a2; a2=a0; f1=f2; f2=f0; k+; else a3=a0; f3=f0; k+; else (這里的否定是表示:如果當(dāng)a0a2) if(f0=f2) a3=a2; a2=a0; f3=f2; f2=f0; k
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025版學(xué)校球場(chǎng)施工合同模板(含場(chǎng)地通風(fēng)與散熱)2篇
- 二零二五年度婚禮現(xiàn)場(chǎng)舞臺(tái)搭建與燈光音響租賃合同6篇
- 個(gè)性化家庭收養(yǎng)協(xié)議2024版版
- 二零二五年度履約保證金協(xié)議書范本:文化旅游項(xiàng)目2篇
- 醫(yī)療器械2025年度原材料供應(yīng)與加工合作協(xié)議3篇
- 2025年度智慧農(nóng)業(yè)灌溉增壓泵供應(yīng)與安裝服務(wù)合同3篇
- 二零二五年度城市更新項(xiàng)目存量房買賣合作框架協(xié)議2篇
- 二零二五版煤礦股權(quán)轉(zhuǎn)讓及礦山安全生產(chǎn)責(zé)任書4篇
- 2025版園藝用樹苗買賣合同規(guī)范范本3篇
- 二零二五年度市場(chǎng)分析預(yù)測(cè)專家顧問聘請(qǐng)書3篇
- 2024年供應(yīng)鏈安全培訓(xùn):深入剖析與應(yīng)用
- 飛鼠養(yǎng)殖技術(shù)指導(dǎo)
- 壞死性筋膜炎
- 整式的加減單元測(cè)試題6套
- 股權(quán)架構(gòu)完整
- 山東省泰安市2022年初中學(xué)業(yè)水平考試生物試題
- 注塑部質(zhì)量控制標(biāo)準(zhǔn)全套
- 人教A版高中數(shù)學(xué)選擇性必修第一冊(cè)第二章直線和圓的方程-經(jīng)典例題及配套練習(xí)題含答案解析
- 銀行網(wǎng)點(diǎn)服務(wù)禮儀標(biāo)準(zhǔn)培訓(xùn)課件
- 二年級(jí)下冊(cè)數(shù)學(xué)教案 -《數(shù)一數(shù)(二)》 北師大版
- 晶體三極管資料
評(píng)論
0/150
提交評(píng)論