大榕树——让我们共成长!
大榕树 myDrs.org
您的位置:大榕树 \ 编程       |  Logo语言   |  Pascal语言   |  信息学奥赛   |  高考保送    |  HTML版本
|  Pascal语言>>算法与技巧>>默认输入输出文件         本站全文搜索: 友情提示:

默认输入输出文件
http://www.mydrs.org  7/25/2001  大榕树


·预定义标准正文文件变量

  Turbo Pascal的System单元提供了两个预定义标准正文文件变量:Input和Output。这两个文件变量在程序开始运行时自动打开,指向键盘输入设备和视频输出设备,并在程序结束时自动关闭。Input是对应键盘的只读文件,Output是对应视频显示器的只写文件。这两个文件使用得十分频繁,因此,当用它们进行读、写操作时,一般省写文件名。如: Write(Ch) 等价于 Write(Output,Ch)
Read(A,B,C) 等价于 Read(Input,A,B,C)
WriteLn 等价于 WriteLn(Output)
ReadLn 等价于 ReadLn(Input)
Eof 等价于 Eof(Input)
Eoln 等价于 Eoln(Input)
ReadLn 等价于 ReadLn(Input,X)
WriteLn(Sqrt(X):10:5) 等价于 WriteLn(Output,Sqrt(X):10:5)

  此外,当在正文文件中使用ReadLn过程时,TurboPascal将回车符(#13或^M)视作行结束标志,#26或^Z视作文件结束标志。当在正文文件中使用WriteLn过程时,Turbo Pascal所输送的行结束标志是回车符/行进符序列(#13#10或^M^J)。


·设置默认输入输出文件

  可以编写下面的子程序来设置默认输入输出文件:
procedure SetIOFiles(const InputPath,OutputPath:string);
begin
 Close(Input);
 Assign(Input,InputPath);
 Reset(Input);
 Close(Output);
 Assign(Output,OutputPath);
 Rewrite(Output);
end;

  例如,若要设置输入和输出文件分别为“Input.txt”和“Output.txt”,则可以调用子程序SetIOFiles('Input.txt','Output.txt')。接着在文件输入和输出时都不再需要写上文件名。若要恢复为键盘输入和视频显示器输出,可以调用SetIOFiles('','')或SetIOFiles('con','con')。

  如果设置默认输入输出文件的缓冲区,将会提高读写操作的速度,收到更好的效果。


作 者:陈世熹
来 源:陈世熹のPascal
共有1837位读者阅读过此文

  • 上篇文章子程序参数进阶
  • 下篇文章中断向量表

  • 发送邮件
    保存页面 打印文章 HTML版本 发表评论

    □- 近期热门文章 □- 相关文章
    1. NOIP2006竞赛大纲 [8306]
    2. 七类高中生具有保送资格 [5910]
    3. NOI2006获奖选手名单 [4955]
    4. 关于举办NOIP2006模拟赛的通告 [4106]
    5. Turbo Pascal各语句运行速... [3594]
    6. Turbo王者归来新Delphi免费... [3181]
    7. IOI2006我国4名选手全部获得金... [2945]
    8. 关于APIO2007与IOI2007... [2763]
    9. noip倒计时 by 枯叶蝴蝶 [2683]
    10. 朱泽园:思想上的金牌更重要 [2168]
    默认输入输出文件
     

    关于本站 | 合作伙伴 | 联系方式
    大榕树 版权所有 ©1999-2006 www.myDrs.org 闽ICP备05000721号