fortran - 从 Fortran 中的特定行号开始读取

Question

我有一个包含 1000 多个数字的文件，例如:

0000
0032
1201
:  :
:  :
:  :
2324

根据输入参数“n”，我想从此文件中从行号“n”到“n+m-1”读取“m”个数字。

有什么想法可以在 Fortran 中执行此操作吗？

Answer 1

我不知道你是否自己尝试过，但这是一个最小的例子: 比如，你的输入文件看起来像这样:

0000
0032
1201
1234
4567
7890
2324

使用此代码(阅读后)

Program jhp
Implicit None
integer :: i
integer, parameter :: &
     m=7, &    !total number of line
     n=4, &    !line to skip
     p=3      !lines to read
integer,dimension(m)::arr   !file to read

open(12,file='file_so',status='old')
do i=1,n
  read(12,*)arr(i)
end do
do i=1,p
  read(12,*)arr(i)
  write(*,*)arr(i)
end do
End Program jhp

这会跳过前 n 行，然后读取 p 行。 希望有帮助