1. PTT
  2. Fortran

Re: [请益] 没有读取到的资料要计算+输出

楼主: jubilee2 (3321)   2013-11-28 15:03:36
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
作者: JiGo (ㄐㄍ)   2013-02-04 13:02:00
好像不是我要的答案耶...不过多谢囉!!
继续阅读
[请益] 没有读取到的资料要计算+输出JiGo[问题] 二维矩阵排序ttvicRe: [问题] 开文件求平均cloudo[问题] 开文件求平均Laoda245566[问题] 算sigmaLaoda245566Re: [问题] 效率janhonRe: [问题] 效率DMFCRe: [问题] 效率MHGRe: [问题] 效率DMFCRe: [问题] 效率Yagyu

Links booklink

Contact Us: admin [ a t ] ucptt.com