信息学奥赛语言教程PASCAL函数表

查字典合肥奥数网讯：信息学奥赛语言教程PASCAL函数表。

1、数学函数

求绝对值函数abs(x)

定义：functionAbs(X):(Sametypeasparameter);

说明：X可以是整型，也可以是实型；返回值和X的类型一致例子：

var

r:Real;

i:Integer;

begin

r:=Abs(-2.3);{2.3}

i:=Abs(-157);{157}

end.

取整函数int(x)

定义：functionInt(X:Real):Real;注意：X是实型数，返回值也是实型的；返回的是X的整数部分，也就是说，X被截尾了（而不是四舍五入）例子：

varR:Real;

begin

R:=Int(123.567);{123.0}

R:=Int(-123.456);{-123.0}

end.

下一页阅读：截尾函数、四舍五入函数

截尾函数trunc(x)

定义：functionTrunc(X:Real):Longint;注意：X是实型表达式.Trunc返回Longint型的X的整数部分例子：

begin

Writeln(1.4,'becomes',Trunc(1.4));{1}

Writeln(1.5,'becomes',Trunc(1.5));{1}

Writeln(-1.4,'becomes',Trunc(-1.4));{-1}

Writeln(-1.5,'becomes',Trunc(-1.5));{-1}

end.

四舍五入函数round(x)

定义：functionRound(X:Real):Longint;注意：X是实型表达式.Round返回Longint型的X的四舍五入值.如果返回值超出了Longint的表示范围，则出错.例子：

begin

Writeln(1.4,'roundsto',Round(1.4));{1}

Writeln(1.5,'roundsto',Round(1.5));{2}

Writeln(-1.4,'roundsto',Round(-1.4));{-1}

Writeln(-1.5,'roundsto',Round(-1.5));{-2}

end.

下一页阅读：取小数函数、求平方根函数和平方函数

取小数函数frac(x)

定义：functionFrac(X:Real):Real;注意：X是实型表达式.结果返回X的小数部分;也就是说，Frac(X)=X-Int(_X).例子：

var

R:Real;

begin

R:=Frac(123.456);{0.456}

R:=Frac(-123.456);{-0.456}

end.

求平方根函数sqrt(x)和平方函数sqr(x)

定义：

平方根：functionSqrt(X:Real):Real;

注意：X是实型表达式.返回实型的X的平方根.平方：functionSqr(X):(Sametypeasparameter);

注意：X是实型或整型表达式.返回值的类型和X的类型一致，大小是X的平方，即X*X.

例子：

begin

Writeln('5squaredis',Sqr(5));{25}

Writeln('Thesquarerootof2is',Sqrt(2.0));{1.414}

下一页阅读：其他常用函数

2、其他常用函数

functionbinstr(value:longint;cnt:byte):string;

将value转二进制，取后cnt个字符所成字串

functionlowercase(c:charorstring):charorstring;

upcase的反函数

proceduresetlength(vars:string;len:longint);

将s长度定为len

functionpower(base,expon:real):real;

base的expon次方

strlcopy函数将一个字符串中的字符复制到另一个字符串中

strlen函数返回字符串中的字符数

strlfmt函数格式化一系列的参数，其结果中包含有指向目标缓冲区的指针

strlicomp函数以最大长度比较两个字符串（不区分大小写）

strlower函数将字符串中的字符转换为小写

strmove函数将一个字符串中的字符复制到另一个字符串中

strnew函数在堆栈上分配一个字符串

strpas函数将以null结束的字符串转换为pascal类的字符串

strpcopy函数将pascal类的字符串复制为以null结束的字符串

strplcopy函数从pascal类的最大长度字符串复制为以null结束的字符串

strpos函数返回一个字符串在另一个字符串中首次出现指针

strrscan函数返回字符串中最后出现字符的指针

strscan函数返回字符串中出现首字符的指针

strtodate函数将字符串转换为日期格式

strtodatetime函数将字符串转换为日期/时间格式

strtofloat函数将给定的字符串转换为浮点数

strtoint函数将字符串转换为整型

strtointdef函数将字符串转换为整型或默认值

strtotime函数将字符串转换为时间格式

strupper函数将字符串中的字符转换为大写

style属性类型选择

suce函数返回后继的参数

swap函数交换参数的高低地址位

tabs属性标记每一项的内容

tabindex属性标记索引

text属性显示的文本

texttofloat函数将字符串（以null结束的格式）转换为浮点数

time函数返回当前的时间

timetostr函数将时间格式转换为字符串

trim函数从给定的字符串中删除前导和尾部的空格及控制字符

trimleft函数从给定的字符串中删除首部的空格及控制字符

trimright函数从给定的字符串中删除尾部的空格及控制字符

trunc函数将实型值截取为整型值

truncate函数截去当前文件位置后的内容

unselectedcolor属性未选中颜色

upcase将字符转换为大写

uppercase将给定的字符串变为大写

val函数将字符串转换为整型值

vararraycreate函数以给定的界限和维数建立变体数组

vararraydimcount函数返回给定变体的维数

vararrayhighbound函数返回给定变体数组维数的上界

vararraylock函数锁定给定的变体数组

vararraylowbound函数返回给定变体数组维数的下界

vararrayof函数返回指定变体的数组元素

vararrayredim函数通过改变上限来调整变体的大小

vararrayunlock函数解锁指定的变体数组

varastype函数将变体转换为指定的类型

varcase函数将变体转换为指定的类型并保存他

varclear函数清除指定的变体

varcopy函数将指定的变体复制为指定的变体

varformdatetime函数返回包含日期时间的变体

varisarray函数测试变体是否为数组

varisempty函数测试变体是否为unassignedvarisnull函数测试变体是否为null

vartodatetime函数将给定的变体转换为日期时间

vartype函数将变体转换为指定的类型并保存他

visible属性控件的可见性

wantreturns属性为true时，按回车键产生一个回车符；为false时，按下ctrl+enter才产生回车符write命令对有格式的文件，写一变量到文件组件中；对文本文件，写一个或多个值到文件

下一页阅读：其他不常用函数

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表示了实际读出的记

录数。注意：只有pcms-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指针处强行结束文件，文件指针后的内容丢失

更多内容，请参加查字典合肥奥数网“杯赛竞赛”频道。

》》“信息学竞赛”

信息学竞赛可能用到的c++语法

信息学奥林匹克竞赛与编程语言的关系

全国青少年信息学奥林匹克竞赛规则

安徽省青少年信息学竞赛基本知识点（小学组）

【信息学奥赛语言教程PASCAL函数表】相关文章：

★ 第九届“走美杯”全国总决赛行程安排

★ 2015年第十三届走美杯初赛考试时间

★ 2011年第九届走美杯初赛五年级组试题答案

★ 第四届“叶圣陶杯”全国中小学生听说读写大赛启动

★ 第11届走美杯数学建模小论文中期总结

★ 【走美杯】第七届“走美杯”考点预测与考题把握

★ 2010“走美”总决赛报名通知

★ 2011年第九届走美杯四至六年级初试试题点评

★ “走美”优秀建模小论文鉴赏

★ 第九届“走美杯”具体时间信息