Fortran：Input and Output

输入输出一般可以分为两类：标准输入(键盘)与标准输出(屏幕)；文件输入输出

由于标准输入输出过于简单，没什么太多可讲的。这里主要介绍文件的输入与输出

1. 文本数据读取
例如有文本文件123.txt。里面的内容如下所示：
123 45 
3.1415
abc de
这里有两点需要注意
(1) 一般而言，读取用read(fileid,*)即可。
fileid为文件通道号。此处的*让编译器自动识别读取格式即可。
(2) 如果读取有空格的字符串，例如上面的abc de,用下面的示例读取
read(fileid,'(a)') str

示例代码如下：
Program main
  implicit none
  integer :: a, b
  real :: c
  character(len=10) :: str 

  open( 100, file = "123.txt" )
  read(100,*) a, b
  read(100,*) c
  read(100,'(a)') str
  close( 100 )

  write(*,'(1x,a,g0)') "a = ", a 
  write(*,'(1x,a,g0)') "b = ", b
  write(*,'(1x,a,g0)') "c = ", c
  write(*,'(1x,a,g0)') "str = ", str
End program main
执行结果如下所示：
a = 123
b = 45
c = 3.140000
str = abc de

2. 文本数据输入
如果向向一个已有数据的文本文件中续写数据，则相应代码如下：
Program main
  implicit none

  open( 100, file = "123.txt", position = "append" )  !.. 如果想覆盖掉原有数据，去掉position = "append"即可
  write(100, *) "luk"
  close( 100 )

End program main

3. 彩蛋
对应地，还有更多的文件操作。比如最常见的批量文本操作，文件夹批量操作。
具体教程这里不在累赘，可加QQ交流群：100125753