FREEPASCAL入门文件输入与输出解析.doc

  1. 1、本文档共15页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
FREEPASCAL入门文件输入与输出解析

使用文件输入输出数据 Pascal中可以用标准文件“input”和“output”来实现,它们分别对应标准的输入设备和标准输出设备(可省略不写),这也就是一些程序的首部如下书写的原因:   program ex(input,output); …… 第1节 产生随机数文件 【问题描述】 500个1000以内的随机正整数,存放在data.out文件中,并同时统计从其中大于等于500的数据个数。 【问题分析】 【程序实现】 Program p4_1(input,output); const n=500; {n为控制随机数个数的变量} var i,a,s:integer; {i为循环变量、a为暂时存放随机数的变量、s为=500的数的个数} f:text; {定义f为文本文件变量} begin assign(f,data.out); {关联文件变量f到一个外部文件data.out} rewrite(f); {以新建写文件的方式打开文件} randomize; {设置随机种子} s:=0; {统计变量清零} for i:=1 to n do begin a:=random(1001); {产生随机数} write(f,a:5); {将随机数写到文件里} if i mod 10 =0 then writeln(f); {每写10个数换一行} if a=500 then s:=s+1; {统计=500的数的个数} end; close(f); {关闭文件} write(=500 :, s); {在屏幕上打印=500的数的个数s } end. 【相关知识】 1pascal程序中写文件的5个步骤 在Pascal程序重创建文件并写入数据要经历5个步骤,即:定义文件变量、关联、写准备、写数据、关闭文件变量。 ① 定义:在变量说明部分定义文件变量,变量名自己取,类型定义为text型。 ② 关联:将一外部磁盘文件名赋于文本文件变量,使该文本文件与一相应外部磁盘文件相关联。命令格式为: assign(f,name) 其中f为定义的文本文件变量,name为实际磁盘上文件的文件名   如:assign(file1, fileout.dat ) 或:assign(f1,e:\aq2006\a1.out ) 磁盘文件如包含路径,如e:\aq2006\a1.out ,则表示将文件存放到e:\aq2006文件夹中,文件名为a1.out,如果不加路径,则存放在pascal工作目录中,如果工作目录没有更改,Free Pascal默认的工作目录一般为“C:\”。 经过关联后,在程序中,如果对文本文件变量file1或f1的操作,也就是对外部实际磁盘文件fileout.dat或e:\aq2006\a1.out的操作。 ③ 写准备:如果要向文件中写入数据,则在写入数据之前应先以写入方式打开。具体的写打开方式有两种: 命令格式1:rewrite(f) 功能:创建并打开新文件准备写,若已有同名文件则删除再创建 命令格式2:append(f) 功能:打开已存在的文件并追加 ④ 写数据:写入数据时,就使用输出语句write和writeln语句,写入的效果就如同将屏幕上的数据原样写入文件中。只是在使用这两条语句时,必须先使用文件变量指明写入对象。如: Write(f,s) 或 writeln(file1,a(5),a(6)) 前者含义为向文件f中写入变量s的值,后者的含义为向文件file1写入数组变量a(5)、a(6)的值。注意,这些数据实际上是写入这些文件变量所关联的磁盘文件中。 ⑤ 关闭:文件写完后,必须关闭,关闭的格式为:Close(f),即关闭文件变量f。 2.查看文本文件   由于文本文件是以ASCII码的方式存储,故查看文本文件的内容是极为方便,在DOS状态可使用 DOS中TYPE等命令进行查看,在Pascal中可以象取程序一样取出文件进行查看。而在windows操作系统中,最方便的方法是按下键盘上空格键两边的windows键,切换到桌面,再找到刚才程序生成的数据文件,用记事本查看该数据文件的内容,如图1.1图4.1所示的就是用记事本打开示例数据文件的效果。 图4.1?????? 用记事本打开数据 3.文本文件的特点 ① 行结构 文本文件由若干行组成,行与行之间用行结束标记隔开,文件末尾有一个文件结束标记。由于各行长度可能不同,所以无法计算出给定行在文本文件中的确定位置,从而只能顺序地处理文本文件,而且不能对一文本文件同时进行输入和输出。 ② 自动转换功能 文本文件的每

文档评论(0)

此项为空 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档