使用文件输入输出数据.docVIP

第4章 使用文件输入输出数据 任何程序都需要产生一些输出，也需要接受若干个输入。这些输入、输出实际上用文件的方来实现的，在Pascal中用标准文件input”和output”来实现，它们分别对应标准输入设备和标准输出设备（可省略不写）这也就是一些程序的如下的原因： 　　program ex(input,output); 　　 对于大量数据的和输出都是文件，这就要求我们必须熟练掌握对文件的操作。 Program p4_1(input,output); const n=500; {n为控制随机数个数的变量} var i,a,s:integer; {i为循环变量、a为暂时存放随机数的变量、s为=500的数的个数} f:text; {定义f为文本文件变量} begin assign(f,data.out); {关联文件变量f到一个外部文件data.out} rewrite(f); {以新建写文件的方式打开文件} randomize; {设置随机种子} s:=0; {统计变量清零} for i:=1 to n do begin a:=random(1001); {产生随机数} write(f,a:5); {将随机数写到文件里} if i mod 10 =0 th