write如何打开一个已有的程序在后面增加数据？

li913

[Fortran] 纯文本查看 复制代码

program test
do i=1,3
open(11,file='1.txt',position='append')
write(11,*) i 
close(11)
end do 
end