资源描述：
《NOIPnoi信息学奥赛习题NOIP》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、文件操作pascal文件操作不存储程序的计算机还不如一个强有力的计算器，最早购买不带磁盘驱动器的用户很快就明白了这一点——当他们关掉计算机的电源时，其工作成果也很就随之消失了。因而，当你的计算机具备了一个软盘驱动器或者还有一个硬盘时，学习使用磁盘文件对编写有用的程序来说就是很重要的了。下面就来介绍Pascal文件的有关知识。文件的概念文件是指由一系列相同类型数据组成的一个数据序列，是一种由用户定义的构造型的数据类型。作为系统提供的一种手段，是计算机与各类设备进行通讯的媒介，从而用以实现信息在程序内外的交换。对于文件我们实际上早已在使用，前面出现的Pascal程
2、序中的输入、输出就是应用文件的方法来实现的，这些文件的名字是Pascal的标准文件“INPUT”和“OUTPUT”，它们分别对应于标准输入设备和标准输出设备，在FreePascal中可省略不写。文件的分类在Pascal的数据文件中，按文件结构形式划分，以ASCII代码形式（字符形式）存放的称为TEXT类型文件，也称为文本文件，这是我们经常要用到的文件类型。还有一种以二进制代码形式存放的文件，称为File类型文件，它又称为类型文件。我们平时用到的是第一种文件类型：文本文件。文本文件特征（1）当程序开始把数据写（输出）到文件中去时，总是从文件的起始位置开始。也就是
3、不能从文件的中间位置开始存放数据。（2）输出的数据是一个接一个地存放在文件中的。（3）当程序从文件中读（输入）数据到内存中时，总是从文件的起始位置开始。也就是不可能从文件的中间的某个位置开始读入数据。（4）读数据时，必须按存入文件时的顺序一个接一个的读入内存中去。（5）对同一个文件的读写操作不能交叉进行。文本文件的定义文本文件不是简单地由某类型的元素序列所组成，它的基本元素是字符，由它们构成行，若干行组成一份原文。由于各行的长度可以不同，所以文本文件只能顺序地处理。文本文件的定义如下：varfp1,fp2:text;文件类型的常用命令(1)assign语法：a
4、ssign(filevar,filename);Filename是合法的文件名的字符串表达式，这个名字赋给文件变量filevar，在程序中对文件变量的操作即为对磁盘文件Filename的操作。如：assign(fp1,’abc.in’);assign(fp2,’abc.out’);这时fp1,fp2是文件类型变量，abc.in、abc.out是实际文件名字，这样文件变量fp1与abc.in、fp2与abc.out、就建立起联系了，在程序中fp1就可以代表abc.in文件、fp2就可以代表abc.out文件使用了。（2）rewrite语法：rewrite(fil
5、evar)功能：创建一个新的磁盘文件，并以写的方式打开该文件，初始化文件为空，文件指针指向开始位置。在使用此命令前需先用assign过程，给文件变量一个实在的文件名。如：rewrite(fp2);这时将在磁盘上工作目录下新建一个空文件abc.out，并打开该开件。若以前工作目录下存在abc.out，则会将原来的文件清空，并将文件指针指向开始位置。（3）reset语法：reset(filevar);功能：打开一个已存在的文件，并将文件指针指向开始位置，表示可开始读入文件，但不能向文件写数据，同样filevar文件名必须存在。如：reset(fp1);打开fp1所
6、代表的文件abc.in，并将文件指针指向开始位置。如果工作目录下不存在abc.in，将会出现错误信息2。(4)close语法：close(filevar)功能：关闭一个文件，无论是向磁盘写文件，还是从磁盘上读取文件的内容，当读、写完毕时都必须用close命令关闭已打开的文件，以保证文件的完整性和可靠性，否则将引起文件处理错误。如：close(fp2);这时将关闭文件fp2，对于被读的文件，可以关闭也可以不关闭，但对于被写的文件，程序结束时，必须关闭，否则，所有写入的信息将不会被写入文件。（5）read或readln语法：read(filevar,var1,va
7、r2,…,varm)功能：从文件filevar中读出若干个数,赋给变量var1，…,varm，这里使用规则和read原来的使用方法相同，只不过在原来变量前加一个文件类型变量filevar而已。如：read(fp1,a,b);这时将从abc.in文件读出两个量分别赋值给a和b两个变量。(6)write或writeln语法：write(filevar,var1,var2,…,varm);功能：向文件filevar中写入若干个数。这里使用规则和write原来的使用方法相同，只不过在原来变量前加一个文件类型变量filevar而已。如：write(fp2,a,b);这时
8、将向abc.out文件写入a和b两个变
