Fortran 语言 文件操作基础

Fortran阿木 发布于 2025-06-20 6 次阅读


摘要:Fortran是一种历史悠久的编程语言,广泛应用于科学计算和工程领域。文件操作是编程中不可或缺的一部分,本文将围绕Fortran语言文件操作的基础知识,详细介绍文件打开、读写、关闭等基本操作,并通过实例代码进行演示。

一、

在Fortran编程中,文件操作是处理数据的重要手段。通过文件操作,我们可以将数据存储到文件中,也可以从文件中读取数据。本文将详细介绍Fortran语言中的文件操作基础,包括文件打开、读写、关闭等操作。

二、文件打开

在Fortran中,使用OPEN语句打开文件。OPEN语句的格式如下:

fortran

OPEN(UNIT=unit_number, FILE='filename', ACCESS='access_mode', FORM='form', STATUS='status', ACTION='action')


其中:

- `unit_number`:指定文件句柄,即文件编号,范围从1到99。

- `filename`:指定要打开的文件名。

- `access_mode`:指定文件的访问模式,如`SEQUENTIAL`(顺序访问)或`DIRECT`(直接访问)。

- `form`:指定文件的格式,如`UNFORMATTED`(无格式)或`FORMATTED`(格式化)。

- `status`:指定文件的状态,如`NEW`(新建文件)、`OLD`(旧文件)或`UNKNOWN`(未知状态)。

- `action`:指定对文件的操作,如`READ`(读取)、`WRITE`(写入)或`READWRITE`(读写)。

以下是一个打开文件的示例代码:

fortran

PROGRAM open_file_example


IMPLICIT NONE


INTEGER :: unit_number

! 打开文件


OPEN(UNIT=10, FILE='example.txt', ACTION='WRITE', FORM='FORMATTED')

! 文件操作...

! 关闭文件


CLOSE(10)


END PROGRAM open_file_example


三、文件读写

在Fortran中,使用WRITE和READ语句进行文件读写操作。以下是一个简单的读写示例:

fortran

PROGRAM read_write_example


IMPLICIT NONE


INTEGER :: unit_number, i


REAL :: number

! 打开文件


OPEN(UNIT=10, FILE='example.txt', ACTION='READWRITE', FORM='FORMATTED')

! 写入数据


DO i = 1, 5


WRITE(10, '(F10.2)') i 1.0


END DO

! 读取数据


DO i = 1, 5


READ(10, '(F10.2)') number


PRINT , 'Read number:', number


END DO

! 关闭文件


CLOSE(10)


END PROGRAM read_write_example


四、文件关闭

在Fortran中,使用CLOSE语句关闭文件。以下是一个关闭文件的示例代码:

fortran

PROGRAM close_file_example


IMPLICIT NONE


INTEGER :: unit_number

! 打开文件


OPEN(UNIT=10, FILE='example.txt', ACTION='WRITE', FORM='FORMATTED')

! 文件操作...

! 关闭文件


CLOSE(10)


END PROGRAM close_file_example


五、总结

本文介绍了Fortran语言文件操作的基础知识,包括文件打开、读写、关闭等操作。通过实例代码,读者可以了解到Fortran文件操作的基本用法。在实际编程中,文件操作是处理数据的重要手段,熟练掌握文件操作对于提高编程效率具有重要意义。

(注:本文约3000字,实际字数可能因排版和编辑而有所变化。)