Fortran第12章.ppt

《Fortran第12章.ppt》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、VisualFortran90程序设计12.1文件的基本概念12.4文件的应用举例12.2文件操作语句12.3文件的操作一、引入文件的目的：便于输入、输出数据的保存与维护二、程序结构的变化：文件要先打开，再输入、输出主程序：单位定义说明打开用于输入、输出的文件从输入文件中读数据调用子程序处理将结果写到输出文件中关闭用于输入、输出的文件END子程序：不变12.1.1记录1、记录：一行称为一个记录（记录是字符或数值的序列），以回车作为标记。记录是输入、输出的基本单位。2、记录的三种格式：（1）有格式记录输入输出数据要经过编辑转换，以ASCII码或其他信息交换码的方式进行传输。数据格式

2、由用户指定(如I3，F4.1格式等)或由编译系统规定(如*格式）（2）无格式记录由二进制代码直接传输，输入输出无需做格式转换。仅适合与磁盘操作（3）文件结束记录是文件的结束标记，文件结束记录不作为数据的内容处理12.1文件基本概念12.1.2文件文件是相关记录的有序集合。文件都有文件名文件的分类1、按存储位置：外部文件、内部文件外部文件：存放在外部存储介质上的文件，或外部设备本身（显示器、打印机等）。内部文件：存放在内存中的一个字符变量、字符数组或字符数组元素。如果内部文件是一个字符变量或字符数组元素，则它只有一个记录。2、按存取方式：顺序存取文件——由记录指针控制顺序存取文件存

3、取操作必须从头到尾顺序进行直接存取文件——由记录号控制可以在程序的执行中对任意一个指定的记录进行读写。3、按格式：随记录分为有格式文件、无格式文件重点掌握有格式顺序存储的外部文件的应用4、打开文件时的状态分类：老文件、新文件老文件：打开文件时，文件已存在新文件：打开文件时，文件不存在注意：文件应先连接（即打开）或预连接（显示器、打印机等），再读写12.1.3逻辑设备1.特殊设备号：由系统预先定义用设备号5定义键盘，设备号6定义显示器*即可定义键盘又可定义显示器注意：这些设备是预连接的，不需要打开就可以直接使用2.内部文件的设备号：不需要打开就可以直接使用字符型变量或字符型数组，用

4、来指定一个内部文件。3.外部文件的设备号数值型的常量或变量，用来指定一个外部文件。一个设备号只能与一个文件相连接，而一个文件一次也只能与一个设备号连接。12.2文件的操作语句对文件的基本操作包括打开、关闭及读、写文件。通常有四种类型的文件：有格式顺序存取文件、无格式顺序存取文件、有格式直接存取文件、无格式直接存取文件。12.2.1、文件的打开一般形式如下：OPEN（连接信息表）连接信息表所包含的说明符如下：1、UNIT=utut是设备号，为整型常数或表达式，值必须是无符号整数0-99，当设备号为第一个说明符时，‘UNIT=’可省略2、FILE=fefe字符型常量或表达式，代表文件

5、名例如：OPEN（3，FILE=‘DATA.DAT’）3、STATUS=ss。ss用户给出的字符串，表示文件的状态。有五种值可选：NEW，OLD，REPLACE，SCRATCH，UNKNOWN默认为UNKNOWN（状态未知，由系统自动处理）其中SCRATCH表示打开临时文件，关闭文件时自动删除。4、ACCESS=as。as是字符串，表示存取方式，其值可为Sequential（顺序的）或DIRECT（直接的）。缺省为顺序SEQUENTIAL5、FORM=fm。fm是字符串，其值为Formated或Unformated，表明文件是有格式的还是无格式的。对顺序文件的缺省值为有格式For

6、mated对直接文件的缺省值为无格式Unformated。6、RECL=rl。rl是正整数的整型表达式，用来指定文件中记录的长度。直接文件中每个记录必须相等，必须选择RECL项，顺序文件不需要使用该项。7、ACTION=an。为一字符串，可取READ、WRITE、Readwrite（默认值）。为可选项8、BLANK=bk。为一字符串，可取为NULL（默认值）或ZERO。控制文件中的空格是忽略不计还是当零处理。为可选项9、IOSTAT=IS。IS整型变量。OPEN语句执行时，获得数值。执行成功则为零，否则为一正整数。为可选项10、ERR=label。若打开文件出错，则转向标号语句。

7、为可选项说明：1、OPEN语句中各说明符的次序可以任意2、文件与设备号在某一程序单元中连接成功，就在该程序的所有单元中都保持这种连接关系。直到程序结束，除非使用CLOSE或新的OPEN语句。例：有格式顺序文件OPEN语句的最简形式OPEN（2，FILE=‘A.DAT’）例：有格式直接文件OPEN语句的最简形式OPEN（2，FILE=‘A.DAT’，ACCESS=‘DIRECT’，FORM=FORMATTED’，RECL=12）RECL：规定记录的统一长度例：无格式顺序文件OPEN