Question

求用fortran 读取一个txt文件的 小例子

Answer 1

假设txt文件名为:'test1.txt',里面只有一个整形数字1。可以通过以下程序读取
program main
implicit none
integer a
open(unit=11,file='test1.txt',status='old')
read(11,*) a
print*, a
close (11)

end

Answer 2

program main
implicit none
real*8::x(1000)
int i
open(10,file="D:\*.txt")
do i=1,1000
read(10,*) x(i)
enddo
stop
end

Answer 3

program main
implicit none
real,dimension(1:n,1:n)::a
open(1,file='inputdat.txt')
read(1,*)((a(i,j),j=1,n),i=1,n)
end program main