信息学奥赛语言教程PASCAL函数表(5)
3、其他不常用函数
Addr
语法functionAddr(varf:text);
说明addr返回一个变量，类型或过程的地址。结果为指针类型
assigncer
语法procedureassigncrt(varf:file;name:string);
说明将文件f的内容输于显示器上
bolckread
语法procedureblockread(varf:file;varb:type;numrecs:integer;varecsread:integer);
说明从无类型文件f中读出number个记录，放在缓冲区b.recsread表示了实际读出的记
录数。注意：只有pc\ms-dos版才支持recsread
bolckwrite
语法procedureblockwrite(varf:file;varb:type;numrecs:integer);
说明从缓冲区b读出numrecs个记录至无类型文件中。
chdir
表示的目录.语法procedurechdir(s:string);
说明将当前的目录换为s所
filesize
语法function(f:file):integer;
说明返回f当前所含的记录数。
filepos
语法function(f:file):integer;
说明返回文件f指针所指向的记录号
fillpoly(dos)
语法frocedurefillpoly(munpoints:word;varpolypoints);
说明用munpoints个点画一个多边形，数组munpoints含多边形的顶点坐标
flush
说明procedureflush(varf:file)
语法刷新用于输出文件f的全部磁盘缓冲区
frac
语法functionfrac(r:real):real;
说明返回实数r的小数部分
fsearch(dos)
语法functionfsearch(path:pathstr;dirlist:string):pathstr
说明查找dirlist目录中的与path相匹配的文件。如果找到则以一个字符串返回结果，否则返回的函数值为一空串
insline
语法procedureinsline;
说明在当前光标的所在位置插入一空行
mark
语法proceduremark(p:pionter)
说明贮存了当前堆顶端知底于指针p中
maxavaih
语法functionmaxavil:longint
说明返回堆中最大的自由块的尺寸
menavail
语法functionmemavail:longint
说明返回堆中自由空间的总长度
mkdir
语法proceduremkdir(s:string)
说明以字符串s命名建立一个目录（文件夹）
parammstr
语法functionparamstr(i;word:string);
说明返回命令行所指定的参数。例如paramstr(1)返回第一个参数。在dos3.0以上的版本返回执行文件的路径和文件名
randomize
语法functionrandomize;
说明初始化随机产生程序。其基数存放在长整型randseed中
release
语法procedurefalease(varp;pointer)
说明释放由mark命令所设置的内存。用mark于贮存指针的堆地址
rename
语法procedurerename(varf:file;s:string)
说明将文件f的文件名变为字符串s
rmdir
语法procedurermdir(s:string)
说明删除目录s(文件夹)
sound（crt单元）
sound(i:integer)
利用内部扬声器发音
seekeof
语法functionseekeof(varfile)：boolean
说明与eof相似，只是在测试文件结束前要跳过空格，制表符号和文件的结束符（cr/cf）
truncate
语法proceduretrunvate
说明在当前文件f指针处强行结束文件，文件指针后的内容丢失
更多内容，请参加合肥奥数网“杯赛竞赛”频道。
》》“信息学竞赛”相关阅读
