Question

请问如何用Fortran语言实现在文件中插入内容？？

Answer 1

可以读入原始文件中的东西，然后写入新的文件
比如说你的文件名为“aa.dat”,有m行,想在第n行插入
Program a
implicit none
integer :: i,m
character(len=100) :: X
open(1,file='aa.dat')
open(2,ile='aa2.dat')
do i = 1, n
read(1,*)X
write(2,*)X
end do
write(2,*)'你想要插入的语句'
do i = n+1, m
read(1,*)X
write(2,*)X
end do
end

追问

谢谢你，这是一个方法。但是文件内容比较多且复杂，行数未知有没有别的办法？

追答

行数未知可以解决
加个整数count_file，num
count_file=0

open(1,file='aa.dat')
do
read(1,*,iostat=num)
if (num<0) exit
count_file=count_file+1
end do
这样num就是文件的行数了