功能：该程序可以在pas文件隔壁自动新建一个test.txt文件，并且在这个记事本文件里自动写入"helloworld"字样。
begin
assign(output,’test.txt’);
rewrite(output);
write(‘helloworld’);
close(output);
end.
功能：该程序可以在pas文件隔壁自动寻找一个test.txt文件，，并且把这个记事本文件里的内容传给一个叫s的变量。
var s:string;
begin
assign(input,’test.txt’);
reset(input);
read(s);
writeln(s);
readln;
close(input);
end.
版权声明：本文为博主原创文章，未经博主允许不得转载（不过这句话并没有什么*用）
有人要进来，有一些人不得不离开。
