fortran程序文件的使用

内部文件作用:一般用于少量二进制数据与字符型数据相 互转换，以及字符串和合并或截取。如：
PROGRAM exam4
CHARACTER*40 str1,str2
str1='125,250,375'
READ(str1,*) i,j,k
WRITE(str2,100) i,j,k,i+j+k
100 FORMAT('i=',I3,' j=',I3,' k=',I3,' i+j+k=',I3)
存取方式是指对文件中数据读写方式,也称文件访问方式。 有两种存取方式：顺序存取和直接存取。
内部文件只有顺序存取,外部文件可顺序存取,也可直接存取。
顺序存取文件记录长度可不同,直接存取文件记录长度相同。 顺序存取方式：在进行存取操作时只能从第1个记录开始按
存储顺序依次进行,即在程序中要读写第N个数据时,必须先 读写前面的N-1个数据,读写时可使用REWIND或BACKSPACE语 句改变文件指针位置(读写位置)。在OPEN语句中用ACCESS选 项指定‘SEQUENTIAL‘，对有格式文件可缺省。 OPEN(UNIT=1,FILE='exam2.in',ACCESS=‘SEQUENTIAL') OPEN(UNIT=2,FILE='exam2.out') 直接存取方式：在进行存取操作时可以读写任意一个记录 (数据),也称随机存取方式。
二进制存储格式：文件中数据以真正的二进制编码形式 (在内存的存储形式)存放。在OPEN语句中用FORM选项指定 ‘BINARY‘。
OPEN(UNIT=1,FILE='exam2.in',FORM=‘BINARY') OPEN(UNIT=2,FILE='exam2.. out',FORM=‘BINARY')
.
文件读写操作结束后，可通过CLOSE语句将文件关 闭。取消逻辑设备符(文件编号)与磁盘上的外部文 件之间的关系。CLOSE语句可缺省。
一般格式： CLOSE([Unit=]<设备号>[,ERR=<错误转移 >][,IOSTAT=<IO状态>] [,STATUS=<文件属性>])
.
外部文件:连接在计算机主机上的一类设备(如：键 盘、显示器、打印机等)或存放在外部存储器上的文 件。外部文件通过一个符合windows命名规则的文件 名进行标识。
外部文件特点:能长期保存大批量数据。 在程序中使用外部文件，必须先用OPEN语句为外部
文件指定设备号，建立外部文件与设备号之间的联 系。如：
write(*,*)i,j,k
write(*,*)str2
END
.
7.2 外部文件分类
外部文件也称磁盘数据文件，简称文件。 有三种存储格式和两种存取方式。 根据不同存储格式和存取方式分类，有六种文
件类型。 有格式顺序存取文件。 有格式直接存取文件。 无格式顺序存取文件。 无格式直接存取文件。 二进制直接存取文件。 二进制顺序存取文件。
第七讲 文件及使用
.
7.1 文件的概念
文件:存放在某种存储设备上的一组数据集合， 由文件名唯一标识。
文件由若干记录组成。没有记录的文件为空文件。 文件操作（读、写）以记录为单位。从文件中一
次输入一个记录，向文件中一次输出一个记录。 通过READ和WRITE语句从文件中输入输出数据。 文件分外部文件和内部文件两种文件。
OPEN(1,FILE='exam2.in') OPEN(2,FILE='exam2.out') READ(1,*) (score(I),I=1,N) WRITE(2,*) ‘学生成绩有：’
.
内部文件:存放在内存储器上的文件。通过一个字符变量 进行标识。
内部文件特点:保存小批量数据，不能长期保存。
对于顺序文件,在读写前,要对文件 指针进行定位,对于直接文件,在读 写过程中,要对文件指针进行定位。
在文件数据的读写过程中,只对文件 指针指向的当前记录进行读写(存 取）。
.ຫໍສະໝຸດ Baidu
数据文件 记录1 记录2 ··· 记录i ··· 记录n
7.3 文件的基本操作
在读写文件数据前，需通过OPEN语句将文件打开。建立逻辑设备 符(文件编号)与磁盘上的外部文件之间的关系。
OPEN(UNIT=1,FILE='exam2.in',ACCESS=‘DIRECT‘,RECL=4 0)
.
每一个文件都有一个隐含的指针,称 为文件指针,文件指针指向文件中的 一个记录,来控制文件的当前读写位 置。
文件打开后,文件指针指向第一个记 录。
文件指针指向的记录称为当前记录。 文件指针指向第一个记录位置,称为 文件的起始位置,文件指针指向最后 一个记录位置,称为文件的结束位置。文件指针
一般格式： OPEN([UNIT=]<设备号>,FILE=<文件名>[,ACCESS=<存取方式>] [,FORM=<存储格式>][,RECL=<记录长度>][,ERR=<错误转移>] [,BLOCKSIZE=<缓冲区大小>][,CARRIAGECONTROL=<首字符含义>] [,DELIM=<分界符>][,BLANK=<空格含义>][,ACTION=<读写方式>] [,IOFOCUS=<子窗口>][,IOSTAT=<IO状态>][,PAD=<补加空格>] [,POSITION=<读取位置>][,SHARE=<共享>][,STATUS=<文件属性 >])
.
存储格式是指文件中数据的存储规则和组织结构。 有三种存储格式：有格式、无格式和二进制。 有格式存储格式：文件中数据以字符形式(ASCII码)存放,
以回车符(CR)和换行符(LF)作为字符行的结束标志。在 OPEN语句中用FORM选项指定‘FORMATTED‘，可缺省。 OPEN(UNIT=1,FILE='exam2.in',FORM='FORMATTED') OPEN(UNIT=2,FILE='exam2.out') 无格式存储格式：文件中数据以二进制形式存放。在OPEN 语句中用FORM选项指定‘UNFORMATTED‘。 OPEN(UNIT=1,FILE='exam2.in',FORM=‘UNFORMATTED') OPEN(UNIT=2,FILE='exam2.out',FORM=‘UNFORMATTED')