打开一个已经存在的磁盘文件，其文件名必须和assig
过程中的变量名f相对应，该文件只能写，此时文件指针指向文件尾。r
r
（4）eol
函数r
r
形式：eol
fr
功能：若文件指针指向行结束符或文件结束符，则返回true，否则返回false。r
对文本文件的写操作步骤：r
assig
fstrr
rewritef或appe
dfr
writefvar表或writel
fr
closefr
对文本文件的读操作步骤：r
assig
fstrr
resetfr
readl
fvar表或readl
fr
closefr
r
例：随机产生30个随机整数存放于文本文件zhoufeitxt中r
programzhoufeir
co
st
30r
varratextr
ii
tegerr
begi
r
ra
domizer
assig
razhoufeitxtr
rewriterar
fori1to
dowritel
rara
dom100r
closerar
e
dr
r
r
附陶陶摘苹果r
r
programappler
varaarray110ofi
tegerr
itotali
tegerr
begi
r
assig
i
putapplei
reseti
putr
assig
outputappleoutrewriteoutputr
fori1to10doreadair
readl
r

30r
forI1to10dor
if
aithe
i
ctotalr
writel
totalr
closei
tputr
closeoutputr
E
dr