noipnoi NOIP信息科学.pptVIP

文件操作;文件操作; 文件的概念 ;文件的分类 ;文本文件特征;文本文件的定义 ;文件类型的常用命令;（2）rewrite 语法：rewrite(filevar) 功能：创建一个新的磁盘文件，并以写的方式打开该文件，初始化文件为空，文件指针指向开始位置。在使用此命令前需先用assign过程，给文件变量一个实在的文件名。 如：rewrite(fp2); 这时将在磁盘上工作目录下新建一个空文件abc.out，并打开该开件。若以前工作目录下存在abc.out，则会将原来的文件清空，并将文件指针指向开始位置。 ;（3）reset 语法：reset(filevar); 功能：打开一个已存在的文件，并将文件指针指向开始位置，表示可开始读入文件，但不能向文件写数据，同样filevar文件名必须存在。 如：reset(fp1); 打开fp1所代表的文件abc.in，并将文件指针指向开始位置。如果工作目录下不存在abc.in，将会出现错误信息2。;(4)close 语法：close(filevar) 功能：关闭一个文件，无论是向磁盘写文件，还是从磁盘上读取文件的内容，当读、写完毕时都必须用close命令关闭已打开的文件，以保证文件的完整性和可靠性，否则将引起文件处理错误。 如：close(fp2); 这时将关闭文件fp2，对于被读的文件，可以关闭也可以不关闭，但对于被写的文件，程序结束时，必须关闭，否则，所有写入的信息将不会被写入文件。 ;（5）read或readln 语法：read(filevar,var1,var2,…,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);这时将向abc.out文件写入a和b两个变量的值。 ;(7)eoln函数 语法：eoln(filevar); 功能：行结束函数，其中文件filevar一定为text类型，函数值为布尔型。当文件指针向回车换行符时，函数值为true（真），否则为false(假)。 ;(8)eof函数（相当于seekeof()） 语法：eof(filevar) 功能：文件结束函数，其中??件filevar是文件类型变量，函数值是布尔值。当文件指针指向文件结束标志时，函数值为true (真)，否则为false(假)。它通常写作seekeof。该函数一般用以判断文件是否结束。;文件类型输入输出一般用法 ;例：读入两个整数，输出两个数的和。用文件类型输入输出。文件名为：abc.pas 测试数据： 输入文件： abc.in 152 908 输出文件： abc.out 1060 ;程序1： program abc; var fp1,fp2:text; a,b,c:longint; begin assign(fp1,abc.in); reset(fp1); assign(fp2,abc.out); rewrite(fp2); read(fp1,a,b); c:=a+b; write(fp2,c); close(fp1); close(fp2); end.;例：读入长方形的长和宽，求它的周长和面积。用文件类型输入输出。文件名为：cfx.pas 保留两位小数，两个数字隔一空格。 测试数据： 输入文件cfx.in： 2.5 3.6 输出文件cfx.out： 12.20 9.00;练习题