Question

如何用fortran大量读取文件

Answer 1

open(11,file='**.**') ! 要读取的文件
open(12,file='**.**') ！存储第一类数据的文件
open(13,file='**.**') ！存储第二类数据的文件
open(14,file='**.**') ！存储第三类数据的文件
open(15,file='**.**') ！存储第四类数据的文件

do i=1,300
read(11,*) x
write(12,*) x
end do
close(12)

do i=301,601
read(11,*) x
write(13,*) x
end do
close(13)

do i=602,902
read(11,*) x,y,z
write(14,*) x,y,z
end do
close(14)

do i=903,1202
read(11,*) x,y,z
write(15,*) x,y,z
end do
close(15)
close(11)
stop
end

Answer 2

方法/步骤
1
首先，安装好visual fortran。

2
创建一个新的fortran程序文本。

3
输入以下代码。
program a
implicit none
integer::n,m,i,j
real,allocatable,dimension(:,:)::a
open(unit=8,file="a.txt")!文件的名字是a.txt
read(8,*)m,n
allocate(a(m,n))
read(8,*)((a(i,j),j=1,n),i=1,m)!把矩阵a读入了
write(*,*)a
end
4
这个a.txt文件里面写的东西比如是（m=2 n=3）：
2 3
8.2 8.9 7.6
4.5 7.7 9.3
然后点击保存,那么经过运行之后也就可以得到一个两行三列的矩阵了。

Answer 3

1、确保数据的类型和你存入变量的类型一致；
2、确保数据文件中每行数据的个数和程序中每行读入的变量个数一致