fortran 读取文件操作

Fortran 读取文件操作可以通过以下步骤实现：

1. 打开文件

使用 `OPEN` 语句打开要读取的文件，指定文件名、访问模式（`READ`）、文件格式等参数。例如：

OPEN(UNIT=10, FILE='filename.txt', ACCESS='READ', FORM='FORMATTED')

2. 读取数据

使用 `READ` 语句从文件中读取数据。根据文件的格式不同，读取方式也有所不同。例如，如果文件是以逗号分隔的文本文件，可以使用以下语句读取一行数据：

READ(10,*) var1, var2, var3

其中 `var1`、`var2`、`var3` 是定义好的变量，用于存储读取的数据。`*` 表示忽略文件中的分隔符。

3. 关闭文件

使用 `CLOSE` 语句关闭文件，释放系统资源。例如：

CLOSE(10)

完整的读取文件操作代码示例：

PROGRAM read_file
  IMPLICIT NONE
  INTEGER :: i, j
  REAL :: x
  CHARACTER(LEN=20) :: str
  OPEN(UNIT=10, FILE='data.txt', ACCESS='READ', FORM='FORMATTED')
  DO i = 1, 3
    READ(10,*) j, x, str
    WRITE(*,*) j, x, str
  END DO
  CLOSE(10)
END PROGRAM read_file

以上代码会打开名为 `data.txt` 的文件，读取前三行数据，分别包含一个整数、一个实数和一个字符串，并将它们输出到屏幕上。