pascal文件的读写操作.ppt

《pascal文件的读写操作.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、文件的操作在我前面的已学的程序中，输入数据是用键盘输入的输出数据是显示在屏幕上的.有没有其它的方式呢????有------文件我们所编写的程序可以从文件中读入要处理的数据.同样也可以将结果输出到文件中.设从文件sum.in中读入数据，将结果放在sum.out文件中在begin后加4句话。Assign(input,’sum.in’);{建立输入文件的关联}Reset(input);{为读取操作打开文件}Assign(output,’sum.out’);{建立输出文件的关联}Rewrite(output);{为写入操作打开文件}…….(程序执行语句)close(inpu

2、t);{关闭输入文件}Close(output);{关闭输出文件}如何实现对文件的操作呢???例1:求整数a和整数b的和.输入文件:sum.in输出文件:sum.out演示Programsum;VarA,b,s:integer;BeginAssign(input,’sum.in’);Reset(input);Assign(output,’sum.out’);Rewrite(output);Read(a,b);S:=a+b;Write(s);Close(input);Close(output);End.注意:1、输入输出文件名：有主文件名和扩展名，中间用“.”隔开。文

3、件名不能和程序名相同。文件名不能和变量名相同。2、调试程序用{}括起来的语句，pascal认为是程序的注释，所以不被运行。所以为了调试方便，一般先用{}将相关文件输入输出语句括起来，仍用键盘和屏幕作为输入和输出调试程序。调试好后再将{}去掉。具体参才下一张幻灯。Programsum;VarA,b,sum:integer;Begin{Assign(input,’sum.in’);Reset(input);Assign(output,’sum.out’);Rewrite(output);}/加了{}后这4句话就认为是注释了，不运行了/Read(a,b);Sum:=a+b

4、;Write(sum);{Close(input);Close(output);}End.文件的状态检测文件是否已经读完：Eof/SeekEof格式：Eof:Boolean格式：SeekEof:Boolean文件读数据时是否已到行末：Eoln/SeekEoln格式：Eoln:Boolean格式：SeekEoln:Boolean特别推荐在竞赛中先不用文件输入输出。编好程序后，再加6句话。当然加6句话时，要能通过编译。更稳妥的办法，加6句话，还要用输入输出文件进行样例测试。