OI爱好者（OIFans.cn）

OI爱好者（OIFans.cn）
www.oifans.cn

    文本文件的内容有ASCII字符集中的字符组成，因此文本文件也称ASCII码文件，它可以用DOS中的type命令列出内容。文本文件具体是由一系列行组成，每一行可以包括0个或多个字符型成分，并以也行结束符结尾，文本文件类型TXT和类型文件file of char区别在于后者不包含行结束符。
    文本文件和类型文件在读写上的差别在于前者只能按次序顺序读写，而后者可以不按照次序读写。适用文本文件的函数和过程除了用于类型文件操作的过程和函数外主要还有：
      (1)readln过程
        形式：readln(f,var表);或readln(f)；
        功能：从磁盘文件f中，将数据依次读到var表表示的各变量中(其中readln(f)只读数据)，并将文件指针移到行结束符后，就是下一行开头。
      (2)writeln过程
        形式：writeln(f,var表)或writeln(f);
        功能：将var表所表示的各个变量的值依次写到磁盘文件f上去(writeln(f)不写值)，然后再写一个行结束符。
      (3)append过程
        形式：append(f);
        功能：打开一个已经存在的磁盘文件，其文件名必须和assign过程中的变量名f相对应，该文件只能写，此时文件指针指向文件尾。
      (4)eoln函数
        形式：eoln(f);
        功能：若文件指针指向行结束符或文件结束符，则返回true，否则返回false。 　　

    对文本文件的写操作步骤：
　    assign(f,str);
　    rewrite(f);　　或append(f);
　    write(f,var表);或writeln(f);
    　close(f);
    对文本文件的读操作步骤：
    　assign(f,str);
    　reset(f);　　
    　readln(f,var表);或readln(f);
    　close(f);

    例：随机产生30个随机整数存放于文本文件zhoufei.txt 中
 　　program zhoufei;
　　　const n=30;
　　　var ra:text;
　　　　　i:integer;
　　begin
　　　randomize;
　　　assign(ra,’zhoufei,txt’);
　　　rewrite(ra);
　　　for i:=1 to n do writeln(ra,random(100));
　　　close(ra)
　　end.