pascal程序中怎样输入输出文件.docVIP

pascal程序中怎样输入输出文件? 一、文件的概念? 文件是按照其内在的逻辑联系分别组织在一起，构成不同的数据集合。它的名字就是文件名。使用文件有以下几点好处：? (1)文件可以永久保存，其中的数据不会因为应用程序的结束或关机而消失。? (2)文件中的数据可以为多个应用程序所共享。? (3)文件中的数据可以多次重复使用。? (4)文件中的存放数据的数量在理论上没有限制。? 在Turbo Pascal语言中，文件是由一系列基本数据元素排列而成的，这些数据元素的数据类型是相同的，但通常有不同的取值。文件的基本数据元素的数据类型称为文件的基类型。文件中所含的数据元素的个数称为文件的长度。文件的长度和文件所占有的字节数可能不同。文件中元素的个数即文件的长度不是固定不变的。? 用于暂时存放文件中的数据的内存区称为文件缓冲区。对于文件的操作至少要由以下三个过程：? (1)打开一个文件? (2)对文件进行操作（读或写）? (3)关闭文件? 按照对文件的读写方式，可以把文件分为顺序文件和随机文件。顺序文件的特点是对文件的读或写操作都只能按文件中元素的顺序，所以顺序文件的读和写不能交叉进行。随机文件的特点是可以直接对文件中某个元素进行读或写，而不需要先对它前面的元素作相同的操作。对于随机文件的读和写可以交叉进行。? Turbo Pascal语言中，按照文件的存储方式可以把文件分为文本文件和类型文件。若文件中的数据都是以ASCII码形式存储的，则这种文件称为文本文件。若文件中的数据都是以非ASCII码形式存储的，则这种文件称为类型文件。Turbo Pascal中文本文件都是顺序文件，类型文件都是随机文件。二、类型文件? 按数据的二进制代码形式存放时的文件称为类型文件。如果再按照组成类型文件的元素数据结构分，又可以分为有类型文件和无类型文件。其定义为：?? type 类型名=file of 基类型；{有类型文件}???? 类型名=file；??? {无类型文件}? 例如：var f:file of integer;???? 说明f为名的变量对应文件将用于存放整数。???? var g:file;???? 说明g为名的变量对应文件的数据无任何规定。? Turbo Pascal有关类型文件的函数和过程（1）assign过程? 形式：assign(f,str);? 功能：将文件名字符串str赋给文件变量f，程序对文件变量f的操作代替对文件str的操作。（2）rewrite过程? 形式：rewrite(f);? 功能：建立并打开一个新的允许写磁盘文件，其文件名必须先由assign过程赋给变量f。这时，指向文件元素的指针指向第一个元素，rewrite过程所建立的文件为空文件。（3）reset过程? 形式：reset(f);? 功能：打开一个已经存在的磁盘文件，其文件名必须先由assign过程赋给变量f,该文件只能读，指向文件元素的指针指向第一个元素。（4）read过程? 形式：read(f,var表);? 功能：从磁盘文件f中，将数据依次读到var表表示的各个变量中。（5）write过程? 形式：write(f,var表);? 功能：将var表所表示的各个变量的值依次写到磁盘文件f上。（6）close过程? 形式：close(f);? 功能：关闭和f关联的磁盘文件，在写操作时自动产生一个文件结束标志。（7）seek过程? 形式：seek(f,n);? 功能：把文件指针移到f指明文件的第n个元素。（8）eof函数? 形式：eof(f);? 功能：若文件指向文件尾，则返回true,否则返回false。? 对有类型文件的写操作步骤为：?? assign(f,str);?? rewrite(f);?? write(f,var表);?? close(f);? 对有类型文件的读操作步骤为：?? assign(f,str);?? reset(f);?? read(f,var表);?? close(f);例：在磁盘上建立一个1～50的平方数的数据文件zhoufei.dat。要求以一个数，这个数的平方数的格式写入。? program zhoufei;?? var f:file of integer;?? i:integer;? begin?? assign(f,zhoufei.dat);?? rewrite(f);?? for i:=1 to 50 do write(f,i,sqr(i));?? close(f)? end. 三、文本文件??文本文件的内容有ASCII字符集中的字符组成，因此文本文件也称ASCII码文件，它可以用DOS中