回 帖 发 新 帖 刷新版面

主题:fortran read疑惑

read(20,*) nowrit,(ipnt(1),jpnt(1),l=1,nowrit)中(ipnt(1),jpnt(1),l=1,nowrit)如何理解
其中
dimension ipnt(99),jpnt(99),l无定义
20 是文件号,其中nowrit能读出来是48,但后面的不知道什么意思
请高手们费心解答。

文件内容
48 1 1  1 2  1 3  1 4  1 5  1 6  1 7  1 8  1 9  1 10                            
2 1  2 2  2 3  2 4  2 5  2 6  2 7  2 8  2 9  2 10  2 11  2 12  2 13  2 14
4 1  4 2  4 3
7 1  7 2  7 3  7 4  7 5  7 7  7 8  7 9  7 10  7 11  7 12  7 13  7 14  7 15
7 16  7 17  7 18  7 19  7 20  7 21  7 22

回复列表 (共1个回复)

沙发


相当于如下输入语句,建议学习下隐式循环部分
read(20,*) nowrit
do l=1,nowrit
    read(20,*) ipnt(1),jpnt(1)
end do

我来回复

您尚未登录,请登录后再回复。点此登录或注册