nbhkdz.com冰点文库

14第十四课 文件

时间:2013-09-29


第十四课 文件

引入
? 在DOS操作中,我们所谈及的文件称之为外部文件。外部文 件是存储在外部设备上,如:外存储器上,可由计算机操作 系统进行管理,如用dir、type等命令直接对文件进行操作。 Pascal所谈及的文件,称之为内部文件。内部文件的特 点是文件的实体(实际文件)也是存储在外存储器上,成为 外部文件的一分子,但在使用时必须在程序内

部以一定的语 句与实际文件联系起来,建立一一对应的关系,用内部文件 的逻辑名对实际文件进行操作。内部文件的逻辑名必须符合 PASCAL语言标识符的取名规则。 ? Pascal中的文件主要用于存放大量的数据。如:成绩管理, 原始数据很多,使用文件先将其存入磁盘,通过程序读出文 件中的数据再进行处理,比不使用文件要来得方便、有效。

文件种类
? Turbo Pascal将文件分为三类:文本文件(顺序)、 有类型文件(顺序或随机)和无类型文件(顺序或 随机)。我们主要介绍文本文件,又称为text类型 文件。 ? 使用文件大致有以下几个步骤: (1)说明文件类型,定义文件标识符; (2)建立内部文件与外部文件的联系; (3)打开文件; (4)对文件进行操作; (5)关闭文件。

文本文件
? 文本文件又称为正文文件或行文文件,可供 人们直接阅读,是人机通信的基本数据形式 之一。文本文件可用文字编辑程序(如DOS 的edit或Turbo Pascal的编辑命令edit)直接 建立、阅读和修改,也可以由PASCAL 程序在运行过程中建立。

文本文件的定义
文本文件的类型为TEXT,它是由ASCII字 符组成的,是Pascal提供的标准文件之一。 标准文件TEXT已由Pascal说明如下: TYPE TEXT=FILE OF CHAR; 因此,TEXT同标准类型INTEGER、 REAL等一样可以直接用于变量说明之中,无 需再由用户说明。 例如: VAR F1,F2:TEXT; 这里定义了两个文本文件变量F1和F2。

建立文件操作步骤
? ①定义文本文件变量; ②把一外部文件名赋于文本文件变量,使该文本文 件与一相应外部文件相关联; 命令格式:assign(f,name) f为定义的文本文件变量 name为实际文件文件名 如:assign(F1,'FILEIN.DAT') 或:assign(F1,'PAS\FILEIN.RES') 这样在程序中对文本文件变量F1的操作,也就是 对外部实际文件`FILEIN.DAT`或`FILEIN.RES`的操 作。上例中文件`FILEIN.DAT`是存贮在当前目录中, 而文件`FILEIN.RES`则是存贮在PAS子目录中。

建立文件操作步骤
? ③打开文本文件,准备写; 命令格式1:rewrite(f) 功能:创建并打开新文件准备写,若已有同名 文件则删除再创建 命令格式2:append(f) 功能:打开已存在的文件并追加 ④对文件进行写操作; 命令格式:write(f,<项目名>) 或 writeln(f,<项目名>) 功能:将项目内容写入文件f中 ⑤文件操作完毕后,关闭文件。 命令格式:close(f)

把1到100这100个数字写到一个文本 文件(ANSWER.TXT)中。
? Var i:integer; F:text; Begin Assign(f,’answer.txt’); Rewrite(f); For i:=1 to 100 do writeln(f,i); Close(f); End.

例题
? 从键盘上输入下表,将数据存入名为A.dat的 文件中。 (第一行两个数字,分别表示表中行、列数) 34 29 30 50 60 80 90 70 75 60 50 70 45

代码
Program ex13_1; var I,j,n,m,x:integer; f:text; begin write(‘n,m=‘); readln(n,m); assign(f,’b.dat’); rewrite(f); writeln(f,n,’ ’,m);
?for i:=1 to n do begin for j:=1 to m do begin read(x); write(f,x,’ ‘); end; readln;writeln(f); end; close(f); end.

读取文本文件
①定义文本文件变量; ②用ASSIGN(f,name)命令,将内部文件f与实际文件name联 系起来; ③打开文本文件准备读:reset(f); 对文件进行读操作:命令格式:READ(f,<变量名表>) READLN(f,<变量名表>) 功能:读文件f中指针指向的数据于变量中 文本文件提供了另外两个命令,在文本的操作中很有用处, 它们是: EOLN(f):布尔函数,用于判断行结束否,回送行结束符 EOF(f):布尔函数,用于判断文件结束否,回送文件结束符 ④文件操作完毕,用CLOSE(f)命令关闭文件。

读出上例建立的文本文件,并输出。
Program ex13_2; Var I,j,n,m,x:integer f:text; Begin assign(f,’b.dat’); reset(f); Read(f,n,m); Writeln(n,’ ‘,m);
For i:=1 to n do begin for j:=1 to m do begin read(f,x); write(x,’ ‘); end; writeln; end; close(f); End.

文本文件的特点
? (1)行结构 文本文件由若干行组成,行与行之间用行结束 标记隔开,文件末尾有一个文件结束标记。由于各 行长度可能不同,所以无法计算出给定行在文本文 件中的确定位置,从而只能顺序地处理文本文件, 而且不能对一文本文件同时进行输入和输出。 (2)自动转换功能 文本文件的每一个元素均为字符型,但在将文 件元素读入到一个变量(整型,实型或字符串型) 中时,Pascal会自动将其转换为与变量相同的数据 类型。与此相反在将一个变量写入文本文件时,也 会自动转移为字符型。


第14课 引人入胜的音视频

课 题 第十四课 引人入胜的音视频 第 课时 (教学内容) 授课时间 授课班级 ...通过设置视频文件的格式,学会一些简单的布局、配色方法,基本理解演示 文稿中插入...

新概念英语第二册 14课 文档

新概念英语第二册 14课 文档_英语学习_外语学习_教育专区。Lesson 14 Do you...新概念英语第二册第十四... 暂无评价 3页 免费喜欢此文档的还喜欢 ...

第14计

第14计_法律资料_人文社科_专业资料。第十四计 披文入情缘辞发 ——真情篇 ...1/2 相关文档推荐 第14章 渠道测量暂无评价 12页 2下载券 14.测量 第十四...

四年级科学上册第十四课练习题

四年级科学上册第十四课练习题 暂无评价|0人阅读|0次下载|举报文档 十四、太阳...4、在你居住的地方,一天之中,在(14 点)时,气温最(高。 )5、我们可以用...

北京交通大学党课第十四章

北京交通大学党课第十四章_党团建设_党团工作_实用文档。1.电影《第一书记》...正确 错误 14.大学生各方面都很优秀是能够入党的首要条件?正确 错误 15.只有...

新疆版七年级下册信息技术教案第14课

暂无评价|0人阅读|0次下载|举报文档新疆版七年级下册信息技术教案第14课_其它课程_初中教育_教育专区。布尔津镇初级中学教案课 题第十四课 丰富网页效果——网站交...

老总网_《万店之王》顶级课程[6.6]-第十四课九大案例

店之王》顶级课程[6.6]-第十四课九大案例_工作计划_计划/解决方案_实用文档...四、 水果店铺: 天内改变惨淡经营为 水果店铺:14 天内改变惨淡经营为客户盈门...

教案浙江版新课程信息技术七下(2)第14课_引人入胜的音...

课题(教学内 容) 授课时间 第十四课引人入胜的音视频 授课班级 第课时 1、...通过设置视频文件的格式,学会一些简单的布局、配色方法,基本理解演示文稿中插入音...

14-15第二工作计划

暂无评价|0人阅读|0次下载|举报文档14-15第二工作...其任课情况如下: 陆万峰任六年级(1)班的语文教学...第十三周 第十四周 第十五周 第十六周 第十七周 ...

小主持人第14课教案

小主持人第14课教案_演讲/主持_工作范文_实用文档。小主持人第十四课教案教学...课节编号 14 教学目标 时间(分钟) 课前 10 15 教具 15 Ong 是后鼻音韵母...