求pascal txt教程

定义：var 文件变量名:text;
关联assign(文件变量名,'路径和文件名');<路径缺省的话默认在制定目录下>
重写或创建：rewrite(文件变量名);
阅读方式打开：reset(文件变量名);
在原文件的基础上向后添加：append(文件变量名);
关闭文件:close(文件变量名);
输入：read/readln (文件变量名,<需要读取的数据,同键盘输入>);
输出：write/writeln (文件变量名,<需要输出的数据，同屏幕输出>);
用完文件后一定要关闭，不然可能没有输出。

考试时文件用以下就够了
begin
assign(input,'文件名.in');reset(input);
assign(output,'文件名.out');rewrite(output);
程序内容
close(input);
close(output);
end.