1.声明文件句柄

integer handle;

2.打开文件

handle = $fopen("data.txt");

3.往文件写数据

$fdisplay(handle,"%d",rand_num);

4.关闭文件

$fclose(handle);