#x #y #z
1 1 1
1 2 4
1 3 9
1 4 16
2 1 1
2 2 4
2 3 9
2 4 16
3 1 1
3 2 4
3 3 9
3 4 16
...
如何将此文件读取到数组x,y,z?
其中x来自第一列,y来自第一列,z来自第一列
我已尝试过一些东西,但我的空白线有问题。
答案 0 :(得分:2)
您的描述非常不完整,但如果我的意图正确,您可以先将该行读入变量并测试它是否为空
character(200) : line
i = 1
do
read(unit, '(a)') line
if (len_trim(line)>0) then
read(line,*) x(i), y(i), z(i)
i = i + 1
end do
end do