Re: [問題] FORTRAN問題

看板Programming作者devil.時間17年前 (2008/03/02 10:01)推噓0(0推 0噓 0→)

留言0則, 0人參與討論串2/4 (看更多)

0. 建議你到 fortran 連線轉信版貼文。 1. 迴圈內不要用實數，這在計概就有說，用整數處理再用 Real 函數轉換。而且你的陣列索引不可能有小數。 2. 什麼東西跑到 200 ？ ==> 本文由 "momo <masto.bbs@ptt.cc>" > 於 news:4YgCjL%248Tl%40ptt.cc 發表 > f=0.5 > > do i=0,3.49,0.01 > fz0=f+0.5*0.01*(((1./sqrt(2.*pi))*exp(-(z(i)**2./2.)))+((1./sqrt(2.*pi))*exp(-(z(i+1)**2./2.)))) > fz(i)=fz0+0.5*0.01*(((1./sqrt(2.*pi))*exp(-(z(i+1)**2./2.)))+((1./sqrt(2.*pi))*exp(-(z(I+2)**2./2.)))) > fz(I+1)=fz(i)+0.5*0.01*(((1./sqrt(2.*pi))*exp(-(z(i+2)**2./2.)))+((1./sqrt(2.*pi))*exp(-(z(I+3)**2./2.)))) > fz(I+2)=fz(i+1)+0.5*0.01*(((1./sqrt(2.*pi))*exp(-(z(i+3)**2./2.)))+((1./sqrt(2.*pi))*exp(-(z(I+4)**2./2.)))) > !fz(i)=fz(I+1) > end do > 要跑到200可已幫我修改一下寫法嗎? > 最後回到3.49 > 請指教多謝 -- 風禹科技驗證有限公司 ASP.NET Web News Reader 0.2.7 UTF-8 Beta 網站地圖 http://tlcheng.twbbs.org/wwwmap.htm 流域防洪/區域水資源/徐昇網/玫瑰圖/語音通訊文章與程式 Basic/Fortran/Windows API/.Net/輔助說明檔原始碼、文章與討論微軟程式設計、系統管理使用新技術論壇討論區，網友回覆後即時簡訊、電子郵件通知： MSDN: http://forums.microsoft.com/msdn-cht/default.aspx?siteid=14 TechNet: http://forums.microsoft.com/technet-cht/default.aspx?siteid=23 -- ASPNET News Reader http://tlcheng.twbbs.org/News/Reader.aspx RSS 2.0 http://tlcheng.twbbs.org/News/rss2.aspx?Action=List&Newsgroup=tw.bbs.comp.language