Re: [問題] 有關fortran寫法

看板Programming作者journeyman.時間18年前 (2007/12/11 05:01)推噓1(1推 0噓 0→)

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

※ 引述《chuee.bbs@binary.csie.ncu.edu.tw (挑戰人生)》之銘言： > 上面這些數字，我寫在另外一個資料檔案，前面數字代表時間，第二排資料是我要用的 > 我現在寫一個主程式，首先我先把這些資料讀過 > 接下來，例如: 我想抓 2005072117 這個時間點的資料值 03. > 然後接下來能讓電腦可以自動去抓 05. 05. 04. 04. 05. 這些值 > 但是接在2005072117後面時間點，我不用再去碰它 > 將變成 2005072117 03. > 05. > 05. > 04. > 04. > 05. 這不就是先找到一項然後讀後面五項嘛那就是兩個狀態找到了讀完了尋找狀態 ────→ 讀取狀態 ────→ 結束沒找到當然還是維持讀取狀態，沒讀完還是讀取狀態，不用寫出來簡單寫起來就是 OPEN(3, ...) READ(3, '(I4,I2,I2,I2,X,I2)') YY,MM,DD,HH,NN IF ({YY/MM/DD/HH符合要求}) THEN DO I=1, 5 READ(3, '(11X, I2)') NN END DO END IF CLOSE(3) 如果在讀取階段還要判斷什麼，比如說後面五天要distinctive 那麼自己寫if下去判斷就成了迴圈也可以改成用DO ... WHILE，或者用EXIT離開DO迴圈詳情請多看online help 如果這還不是你的想法，那是因為從你上面的描述看起來就是如此因為不太清楚你還要做什麼，所以就是這樣了　 -- X-URL1: http://www.aviationnow.com/ ‧李登輝＝格達費＝外星人‧有廁檢舉匪諜人人有責 ⊙ 檢舉匪諜安居樂業人所檢舉匪諜滲透破壞人人安居樂業｜肅清貪污經濟犯罪社會繁榮進步　破案獎金三百萬｜知情不報判徒刑檢舉要件：請用真實姓名、地址，受理機關絕對保密 X-Disclaimer: 李登輝一定是外星人！ Mk.22 Mod4 5/15/01 Mod3 6/9/98 -- ┌─────◆ＫＫＣＩＴＹ◆─────┐ ★ 人人可架站，經營社群聯誼天地 ★ │ bbs.kkcity.com.tw │ 歡迎社團/班系/歌友/藝文創作/公益申請 └──《From:59.115.193.230 》──┘ 到 KKCity 開設自己喜愛的主題ＢＢＳ站 --