最速下降法編程.ppt

最速下降法編程.ppt

ID：48520889

大?。?1.50 KB

頁數(shù)：8頁

時間：2020-01-23

最速下降法編程.ppt_第1頁
最速下降法編程.ppt_第2頁
最速下降法編程.ppt_第3頁
最速下降法編程.ppt_第4頁
最速下降法編程.ppt_第5頁
資源描述：

《最速下降法編程.ppt》由會員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。

1、相關(guān)公式如下：X(k)點(diǎn)的搜索方向令：=0參考界面函數(shù)請輸入初始點(diǎn)x1x2計(jì)算清除計(jì)算后結(jié)果x1x2目標(biāo)函數(shù)值請輸入精度優(yōu)化設(shè)計(jì)VB編程（僅供參考）PrivateSubCommand1Click()Dimx1AsSingle,x2AsSingle,JDAsSingleDimcAsSingle,JGAsSingle,aAsSinglex1=Val(text1.Text)x2=Val(text2.Text)JD=Val(text3.Text)a=0c=Sqr((2/3*x1)^2+x2^2)DoWhilec>JD

2、a=(4/9*x1^2+x2^2)/(8/27*x1^2+x2^2)x1=x1+a*(-2/3*x1)x2=x2+a*(-x2)c=Sqr((2/3*x1)^2+x2^2)LoopJG=1/3*x1^2+1/2*x2^2text4.Text=JGtext5.Text=x1text6.Text=x2EndSubPrivateSubCommand2Click()text3.Text=“”text4.Text=“”text5.Text=“”text6.Text=“”EndSub

當(dāng)前文檔最多預(yù)覽五頁，下載文檔查看全文

此文檔下載收益歸作者所有

當(dāng)前文檔最多預(yù)覽五頁，下載文檔查看全文
溫馨提示：
1. 部分包含數(shù)學(xué)公式或PPT動畫的文件，查看預(yù)覽時可能會顯示錯亂或異常，文件下載后無此問題，請放心下載。
2. 本文檔由用戶上傳，版權(quán)歸屬用戶，天天文庫負(fù)責(zé)整理代發(fā)布。如果您對本文檔版權(quán)有爭議請及時聯(lián)系客服。
3. 下載前請仔細(xì)閱讀文檔內(nèi)容，確認(rèn)文檔內(nèi)容符合您的需求后進(jìn)行下載，若出現(xiàn)內(nèi)容與標(biāo)題不符可向本站投訴處理。
4. 下載文檔時可能由于網(wǎng)絡(luò)波動等原因無法下載或下載錯誤，付費(fèi)完成后未能成功下載的用戶請聯(lián)系客服處理。