FORTRAN中的输入输出操作详解
1 输入输出基础
在编程领域,输入输出(I/O)是程序与外部世界进行数据交换的关键环节。无论是从文件读取数据,还是向屏幕输出结果,输入输出操作都是不可或缺的一部分。本文将深入探讨FORTRAN语言中的输入输出机制,帮助读者掌握这一重要技能。
1.1 文件和设备的输入输出操作
FORTRAN支持多种输入输出设备,包括文件、键盘和屏幕。为了简化输入输出操作,FORTRAN提供了标准化的语句和格式,使得开发者能够高效地处理各种数据源。
文件输入输出
文件输入输出操作主要通过 OPEN
、 CLOSE
、 READ
和 WRITE
语句实现。以下是一个简单的文件读取示例:
PROGRAM FileIOExample
IMPLICIT NONE
INTEGER :: status
REAL :: data
OPEN(UNIT=10, FILE='data.txt', STATUS='OLD', ACTION='READ', IOSTAT=status)
IF (status /= 0) THEN
PRINT *, 'Error opening file!'
STOP
END IF
READ(10, *) data
PRINT *, 'Data read from file:', data
CLOSE(10)
END PROGRAM FileIOExampl