第13章_文件 FORTRAN 课件 华中科技大学.pdfVIP

第 十 三 章 文 件 说明： 在实际应用中，往往大量需要处理的数据是由专 门人员来采集,并构成以文件名来具体代表的数据 文件;大型有限元软件的数据也是以此出现的． 文件名通常由三部分组成：存放的设备、文件名 本身、文件类别； 如何从各种设备上获得不同类型的数据文件就是 我们在进行科学计算时常常遇到的问题； 我们现在主要以磁盘设备为例来介绍F77对文件 操作的语句（打开、关闭、定位、输入和输出） F77的数据文件由记录组成，也就是对文件 的存取是以记录为单位进行的； 记录：长度不超过规定范围的数字或文本 的集合; F77的数据文件按存取方式可划分为： 1. 顺序存取文件（顺序文件） 其存取操作必须从头到尾顺序进行； 2. 直接存取文件（直接文件） 在程序的执行过程中对任意一个指定的 记录进行操作(读和写) F77的数据文件的存储形式： 1. 字符形式（ASCII ） ——称之为“有格式存放” FORMATTED 2. 二进制数代码形式 ——称之为“无格式存放” UNFORMATTED 本章主要内容： 有格式顺序存取文件； 有格式直接存取文件； 无格式文件的存取； 文件操作语句； 程序举例。 13.1有格式顺序存取文件 我们已经知道：READ语句是完成数据输入 任务的。 从键盘输入一行数据（以Enter键作为确 认），就是一个“记录”。 从键盘输入一行数据时，必须与指定的格 式对应（格式编辑符与输入的数据类型以 及宽度），否则就会出错(报错)。 13.1有格式顺序存取文件 Read(*,100) A,B C=A+B Write(*,200) ‘A= ‘,A, ‘B= ‘,B Write(*,200) ‘C= ‘,C 100 Format(2F6.1) 200 Format(1X,2(A,F7.2)) End 输出： 输入： A=__10.10_B=__20.40 __10.1__20.4 C=__30.50 13.1有格式顺序存取文件 下面我们就介绍如何从文件中获得数据： (例如:从文件F1.DAT中读取数据,经过处理 后,将结果保存在F2.DAT中) 1. 准备数据文件(可以在各种编辑器中完成, 输入格式及宽度与程序要求的一致),数据文 件名的后缀为 *.DAT; 2. 编写数据输入和数据处理文件,最后将结 果输出到F2.DAT中. character*8 Fname1 Integer U1 数据输 U1=3 入和数 Fname1=‘F1.DAT’ 据处理 Open(Unit=U1,File=Fname1,Status=‘OLD’, $ Access=‘Sequential’,Form=‘Formatted’) Read(U1,100) A,B C=A+B Open(Unit=2,File=‘F2.DAT’,Status=‘New’, $ Access=‘Sequential’,Form=‘Formatted’) 数据 Write(2,200) ‘A=’,A, ‘B=’, B 输出 Write(2,200) ‘C=’,C Close (U1) Close(2) _123.1_12