Re: [請益] 沒有讀取到的資料要計算+輸出

看板Fortran作者 (3321)時間10年前 (2013/11/28 15:03), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/3 (看更多)
DO J=1,128 READ(104,305)ND,VAL IF(ND.LT.1 .OR. ND.GT.128) then WRITE(108,306)ND,0 else U01=VAL CJ=U01/FRA WRITE(108,306)ND,CJ end if END DO -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.38.129

12/04 13:02, , 1F
好像不是我要的答案耶...不過多謝囉!!
12/04 13:02, 1F
文章代碼(AID): #1IbkhAq6 (Fortran)
文章代碼(AID): #1IbkhAq6 (Fortran)