Pascal竞赛读文件方法

Pascal程序读文件要求


例如：
   输入文件名 1.in

   输出文件名 1.out

var
  ...
begin
  assign(input,'1.in'); 
   
  reset(input); 
   
  assign(output,'1.out'); 
   
  rewrite(output); 




  程序...


  close(input); 
    
  close(output);
end.