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

[jubilee2 (3321)]

      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
推 JiGo:好像不是我要的答案耶...不過多謝囉!!