关于Pascal的文件操作 [复制链接]

在考试的时候,一般要求用文件读入和文件输出
比如某个题目名叫work,题目要求work.in作读入文件,work.out做输出文件

begin
  assign(input,'work.in');{导入读入文件}
  reset(input);{打开}
  assign(output,'work.out');{导入输出文件}
  rewrite(output);{打开}
  main;{主程序}
  close(input);{关闭读入文件}
  close(output);{关闭输出文件}
end.

对于文件操作的注意:
1.文件路径要写正确,如果



assign(input,'work.in');



则说明读入文件在默认文件夹下,如果不再也可以写路径


assign(input,'c:\data\work.in');



2.输入输出文件一定都要关闭


close(input);
close(output);



这两句话一定要写,否则会出现Run time error
[p:3]

顶阿甘~

很对

添个技巧不知道大家知不知道

assign(input,'work.in');{导入读入文件}
assign(output,'work.out');{导入输出文件}
例如想打开‘work.in或work.out文件
只需要在文件扩展名的“.”前面按Enter＋Ctrl就哦了！！！

这个文件类型是file,还是txt?

是 text

应该都可以吧.
例如var a,b,c:integer;
        f1,f2:text;
    begin
    assign(f1,'a.txt');
    reset(f1);
    readln(f1,a,b);
    close(f1);
    c:=a+b;
    assign(f2,'b.txt');
    rewrite(f2);
    writeln(f2,c);
    close(f2);
end.

我想也是ｔｘｔ

一般复赛的文件明都给你！！
还有我所用过的扩展名txt,in,out,pas......许多许多

好的很，顶