Fortran文件续写

sufx2007

Fortran文件读写是否有如下功能：
1、对于已存在的文件a.dat，我希望打开后在文件初始加入一些内容，且保留已经存在的。
     例如，a.dat已有内容为2 3 4 5（每个数字一行），现在我想在原有的基础上在第一行加入1，使数据变为1 2 3 4 5.
     我使用
     open（1，file=‘a.dat’，access=append）
     rewind 1
     write（1，*）"1"
     结果前有数据还是被擦拭掉了，a.dat中只有1

2、打开文件后倒叙读取文件
     例如，a.dat文件内容1 2 3 4 5 6 7 8 9，我想从最后一行读取，一次为9 8 7 6 5 4 3 2 1.
谢谢！

sufx2007

楚香饭 发表于 2015-4-4 12:27
1.先把原有的内容读出来，然后write 1，再write原有内容。
其他编辑器，比如记事本，UltraEdit 也是这样做 ...

谢谢
对于第一个问题：为了加入很少的语句而重复写入一次，程序不够优化，是否有其他的办法呢？
我原本想加入的这几行重新写入另外一个文件，但是想着写入一个文件会好些。