nbhkdz.com冰点文库

14第十四课 文件


第十四课 文件

引入
? 在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程序清单 14-1: //FileViewer1.java 1 import java.io.*; 2 ...

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

新疆版七年级下册信息技术教案第14课_其它课程_初中教育_教育专区。布尔津镇初级...2.超链接的目标可以是网页、站点、电子邮箱、文件第十四课 丰富网页效果—...

小主持人第14课教案

小主持人第14课教案_演讲/主持_工作范文_实用文档 暂无评价|0人阅读|0次下载|举报文档小主持人第14课教案_演讲/主持_工作范文_实用文档。小主持人第十四课教案...

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

教案浙江版新课程信息技术七下(2)第14课_引人入...课题(教学内 容) 授课时间 第十四课引人入胜的音...通过设置视频文件的格式,学会一些简单的布局、配色...

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

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

人教版八年级历史上册第十四课导学案

人教版八年级历史上册第十四课导学案_工作计划_计划/解决方案_实用文档。人教版八年级历史上册 第 14 课 《难忘九一八》导学案设计人:李振刚 【学习目标】 1 ...

冀教版三年级下学期语文第十四课习题

冀教版三年级下学期语文第十四课习题 隐藏>> 14.金色的蒲公英姓名一.汉字注音。 (24 分) 电铃烦恼练习叙述虽然罗汉 分数 严肃适当奖励卷尺振兴夹击二.近反义词。...

音体美教研活动(第十四期)_图文

音体美教研活动(第十四期)_工作计划_计划/解决方案_实用文档。精河县第二中学 简第 14 期 精河县第二中学 2015 年 9 月 1 日 报 加强音体美教学 促进...

孙鑫视频讲座第14课-笔记

孙鑫视频讲座第14课-笔记_IT/计算机_专业资料。关于...孙鑫VC 视频教程笔记之第十四课 “基于 TCP 和 ...如从网上载的安装文件,不能缺少任何信息 UDP:是无...

第14课_认识地震(一)——powerPoint超级链接

第14课_认识地震(一)——powerPoint超级链接_其它....1. 第十四课 认识地震(一)——PowerPoint 超级...在 E:盘根目录下建立“西部资源 资料” 文件夹, ...