Re: [請益] 沒有讀取到的資料要計算+輸出
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
討論串 (同標題文章)
完整討論串 (本文為第 2 之 3 篇):
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章