pascal常用函数(较全)
PASCAL中常用的函数和过程

随机数在信息学奥林匹克中可用于随机化搜索、穷举等算法,以优化其性能, 也可用于在快速排序中选择关键数,以使其快速排序算法的最坏情况没有固定的 相应数列。
另外,System 单元中随机种子变量的标识符为 RandSeed,你也可以手动修 改它。如果你希望使用了随机数的程序对同一个输入数据能有恒定的输出结果, 可以设置 RandSeed 为一个定值。
附: 如何获取随机数?
随机数是指理论上没有规律可循、在指定范围内每个数的出现几率相等、无 法根据之前的数来预测下一个数的数列。一般随机数生成器的基本原理是:首先 初始化一个随机种子,其初始值可以是任意的整数;在每次获取随机数时,以随 机种子为基础进行某种特殊的运算,获得一个随机数并返回之,然后再对随机种 子进行某种运算,改变随机种子的值。这样,就可以生成许多比较随机的数,但 同一个初始值的随机种子将会生成完全相同的随机数列。
Writeln(-1.5, 'rounds to ', Round(-1.5));{ -2 } end.
5、取小数函数 frac(x) 定义:function Frac(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.
pascal常用函数

Pascal常用函数PASCAL内自带的函数,通常可以直接调用,特殊的需要调用数据库,如:used math一、标准函数二、数学函数与过程三、字符类型函数四、字符串函数与过程五、布尔类型函数六、math单元的函数与过程一、标准函数标准函数。
Turbo Pascal语言提供了自变量为整型量的标准函数有顺序函数算术函数和转换函数等。
标准函数是Turbo Pascal语言预先定义的,它们实际上是能完成特定功能的称步子程序的程序段。
每个标准函数都用一个标识符来标识,每个标准函数都能完成一个特定的功能,在程序中可以直接调用它们。
Turbo Pascal语言中某些标准函数与数学中的函数有相似之处。
1、整数类型函数整型是顺序类型,即所有的整型数都是按一定的顺序排列的。
如3的后序数是4,350的后序数是351。
以后介绍的布尔型、字符型、枚举类型和子界类型等都是顺序类型。
顺序函数可以对顺序类型数据进行操作,但要注意它们自变量的取值范围。
①前趋函数:Pred(x)函数值为x-l,例如:Pred (6)=5 Pred (-21)=-22②后继函数:Succ (x)函数值为x+l,例如:Succ (l5)=16 Succ (-114)= -113③绝对值函数:Abs (x)函数值为|X|,例如:Abs (-119)=119 Abs (101)=101④平方函数:Sqr (x)函数值为X*X,例如:Sqr (-5)=25 Sqr (l0)= 100以上四个函数的结果仍是整型数。
⑤奇函数:Odd (x),函数的结果为布尔型。
当X为奇数时,函数值为true;当X为偶数时,函数值为false,例如:Odd (13)= True Odd (16)= False⑥字符函数:Chr (X),函数值是序号的ASCII字符,属字符型,例如:Chr (65)=‟A‟ Chr (66)=‟B‟2、实数类型函数在下列算术函数中,X可以是实型或整型数的表达式。
pascal标准函数

输出是:this is 0001234]
对于字符型,刚好和整型值相反,如果prec比字符串型的长度大则没有效果,反之比字符串型的长度小,则会截断尾部的字符
Format('this is %.2s',['1234']);
如:
Format('this is %1d',[12]);
输出是:this is 12
["-"]这个指定参数向左齐,和[width]合在一起最可以看到效果:
Format('this is %-4d,yes',[12]);
输出是:this is 12 ,yes
["." prec] 指定精度,对于浮点数效果最佳:
注意有两点,一是只表示到小数后两位,等一下说怎么消除这种情况, 二是,即使小数没有被截断,它也不会也像整数部分一样有逗号来分开的
m钱币类型,但关于货币类型有更好的格式化方法,这里只是简单的格式化,另外它只对应于浮点值
Format('this is %m',[9552.21]);
返回:this is ¥9,552.21
序数函数Ord (ch)::给出字符ch在ASCII字符集中的序号,结果为整型。
注意:Ord (’7’)<>7,正确的是:Ord (’7’)=Ord(’0’)+7=48+7=55
若ch是数字字符,则Ord (ch)-Ord ("0")是该数字字符的数值。例如:Ord (’7’)-Ord(’0’)=7
如以下例子:
PASCAL语言函数集

Pascal语言函数集(含Delphi控件属性) abort函数引起放弃的意外处理abs函数绝对值函数addexitproc函数将一过程添加到运行时库的结束过程表中addr函数返回指定对象的地址adjustlinebreaks函数将给定字符串的行分隔符调整为cr/lf序列align属性使控件位于窗口某部分alignment属性控件标签的文字位置allocmem函数在堆栈上分配给定大小的块allowgrayed属性允许一个灰度选择ansicomparestr函数比较字符串(区分大小写)ansicomparetext函数比较字符串(不区分大小写)ansilowercase函数将字符转换为小写ansiuppercase函数将字符转换为大写append函数以附加的方式打开已有的文件arctan函数余切函数assignfile函数给文件变量赋一外部文件名assigned函数测试函数或过程变量是否为空autosize属性自动控制标签的大小backgrounddi2001.jpg属性背景色beginthread函数以适当的方式建立用于内存管理的线程bevelinner属性控件方框的内框方式bevelouter属性控件方框的外框方式bevelwidth属性控件方框的外框宽度blockread函数读一个或多个记录到变量中blockwrite函数从变量中写一个或多个记录borderstyle属性边界类型borderwidth属性边界宽度break命令终止for、while、repeat循环语句brush属性画刷caption属性标签文字的内容changefileext函数改变文件的后缀chdir函数改变当前目录checked属性确定复选框选中状态chr函数返回指定序数的字符closefile命令关闭打开的文件color属性标签的颜色columns属性显示的列数comparestr函数比较字符串(区分大小写)concat函数合并字符串continue命令继续for、while、repeat的下一个循环copy函数返回一字符串的子串cos函数余弦函数ctl3d属性是否具有3d效果cursor属性鼠标指针移入后的形状date函数返回当前的日期datetimetofiledate函数将delphi的日期格式转换为dos的日期格式datetimetostr函数将日期时间格式转换为字符串datetimetostring函数将日期时间格式转换为字符串datetostr函数将日期格式转换为字符串dayofweek函数返回星期的数值dec函数递减变量值decodedate函数将日期格式分解为年月日decodetime函数将时间格式分解为时、分、秒、毫秒delete函数从字符串中删除子串deletefile命令删除文件diskfree函数返回剩余磁盘空间的大小disksize函数返回指定磁盘的容量dispose函数释放动态变量所占的空间disposestr函数释放字符串在堆栈中的内存空间ditherbackgrounddi2001.jpg?使背景色的色彩加重或减少50%dragcursor属性当鼠标按下时光标的形状dragmode属性按动的作用方式dropdowncount属性容许的显示数据项的数目editmask属性编辑模式enabled属性是否使标签呈现打开状态encodedate函数将年月日合成为日期格式encodetime函数将时、分、秒、毫秒合成为时间格式endmargin属性末尾边缘eof函数对有类型或无类型文件测试是否到文件尾eoln函数返回文本文件的行结束状态erase命令删除外部文件exceptaddr函数返回引起当前意外的地址exclude函数从集合中删除一些元素exceptobject函数返回当前意外的索引exit命令立即从当前的语句块中退出exp函数指数函数expandfilename函数返回包含绝对路径的字符串extendedselect属性是否允许存在选择模式,true时,multiselect才有意义extractfiledir函数返回驱动器和路径extractfileext函数返回文件的后缀extractfilename函数返回文件名extractfilepath函数返回指定文件的路径fileage函数返回文件已存在的时间fileclose命令关闭指定的文件filecreate命令用指定的文件名建立新文件filedatetodatetime函数将dos的日期格式转换为delphi的日期格式fileexists函数检查文件是否存在filegatattr函数返回文件的属性filegetdate函数返回文件的dos日期时间标记fileopen命令用指定的存取模式打开指定的文件filepos函数返回文件的当前指针位置fileread命令从指定的文件读取filesearch命令在目录中搜索指定的文件fileseek函数改变文件的指针filesetattr函数设置文件属性filesetdate函数设置文件的dos日期时间标记filesize函数返回当前文件的大小filewrite函数对指定的文件做写操作fillchar函数用指定的值填充连续字节的数findclose命令终止findfirst/findnext序列findfirst命令对指定的文件名及属性搜索目录findnext命令返回与文件名及属性匹配的下一入口floattodecimal函数将浮点数转换为十进制数floattostrf函数将浮点数转换为字符串floattostr函数将浮点数转换为字符串floattotext函数将给定的浮点数转换为十进制数floattotextfmt函数将给定的浮点数转换为十进制数flush函数将缓冲区的内容刷新到输出的文本文件中fmtloadstr函数从程序的资源字符串表中装载字符串fmtstr函数格式化一系列的参数,其结果以参数result返回font属性设置字体format函数格式化一系列的参数并返回pascal字符串formatbuf函数格式化一系列的参数formatdatetime函数用指定的格式来格式化日期和时间formatfloat函数指定浮点数格式frac函数返回参数的小数部分freemem函数按给定大小释放动态变量所占的空间getdir返回指定驱动器的当前目录getheapstatus返回内存管理器的当前状态getmem建立一指定大小的动态变量,并将指针指向该处getmemorymanager返回内存管理器的入口点glyph函数按钮上的图象halt停止程序的执行并返回到操作系统hi返回参数的高地址位high返回参数的上限值hint属性提示信息int返回参数的整数部分include添加元素到集合中insert在字符串中插入子串inttohex将整型数转换为十六进制数inttostr将整型数转换为字符串ioresult返回最新的i/o操作完成状态isvalidident测试字符串是否为有效的标识符items属性默认显示的节点kind属性摆放样式largechange属性最大改变值layout属性图象布局length函数返回字符串的动态长度lines属性缺省显示内容ln函数自然对数函数lo函数返回参数的低地址位loadstr函数从应用程序的可执行文件中装载字符资源lowercase函数将给定的字符串变为小写low函数返回参数的下限值max属性最大值maxlength属性最大长度min属性最小值mkdir命令建立一子目录move函数从源到目标复制字节multiselect属性允许同时选择几个数据项name属性控件的名字new函数建立新的动态变量并设置一指针变量指向它newstr函数在堆栈上分配新的字符串now函数返回当前的日期和时间odd测试参数是否为奇数onactivate事件焦点移到窗体上时触发onclick事件单击窗体空白区域触发ondblclick事件双击窗体空白区域触发onclosequery事件使用者试图关闭窗体触发onclose事件窗体关闭后才触发oncreate事件窗体第一次创建时触发ondeactivate事件用户切换到另一应用程序触发ondragdrop事件鼠标拖放操作结束时触发ondragover事件有其他控件从他上面移过触发onmousedown事件按下鼠标键时触发onmouseup事件释放鼠标键时触发onmousemove事件移动鼠标时触发onhide事件隐藏窗体时触发onkeydown事件按下键盘某键时触发onkeypress事件按下键盘上的单个字符键时触发onkeyup事件释放键盘上的某键时触发onpaint事件窗体上有新部分暴露出来触发onresize事件重新调整窗体大小触发onshow事件在窗体实际显示之前瞬间触发ord返回序数类的序数outlinestyle属性类型outofmemoryerror引起outofmemory意外pageindex属性页索引pages属性页paramcount函数返回在命令行上传递给程序的参数数量paramstr函数返回指定的命令行参数pen属性画刷设置pi函数返回圆周率pipicture属性显示图象pictureclosed属性设置closed位图pictureleaf属性设置leaf位图pictureminus属性设置minus位图pictureopen属性设置open位图pictureplus属性设置plus位图pos函数在字符串中搜索子串pred函数返回先前的参数random函数返回一随机函数randomize函数用一随机数初始化内置的随机数生成器read函数对有格式的文件,读一文件组件到变量中;对文本文件,读一个或多个值到一个或多个变量中readln函数执行read过程,然后跳到文件下一行readonly属性只读属性reallocmem函数分配一动态变量rename函数重命名外部文件renamefile函数对文件重命名reset函数打开已有的文件rewrite函数建立并打开一新的文件rmdir函数删除空的子目录round函数将实数值舍入为整型值runerror函数停止程序的执行scrollbars属性滚动条状态seek函数将文件的当前指针移动到指定的组件上seekeof函数返回文件的文件结束状态seekeoln函数返回文件的行结束状态selectedcolor属性选中颜色setmemorymanager函数设置内存管理器的入口点settextbuf函数给文本文件指定i/o缓冲区shape属性显示的形状showexception函数显示意外消息与地址sin函数正弦函数sizeof函数返回参数所占的字节数smallchange属性最小改变值sorted属性是否允许排序sqr函数平方函数sqrt函数平方根函数startmargin属性开始边缘state属性控件当前状态str函数将数值转换为字符串stralloc函数给以null结束的字符串分配最大长度-1的缓冲区strbufsize函数返回存储在由stralloc分配的字符缓冲区的最大字符数strcat函数将一字符串附加到另一字符串尾并返回合并的字符串strcomp函数比较两个字符串strcopy函数将一个字符串复制到另一个字符串中strdispose函数释放堆栈上的字符串strecopy函数将一字符串复制到另一个字符串并返回结果字符串尾部的指针strend函数返回指向字符串尾部的指针stretch属性自动适应控件的大小strfmt函数格式化一系列的参数stricomp函数比较两个字符串(不区分大小写)stringtowidechar函数将ansi字符串转换为unicode字符串strlcat函数将一字符串中的字符附加到另一字符串尾并返回合并的字符串strlcomp函数以最大长度比较两个字符串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函数测试变体是否为nullvartodatetime函数将给定的变体转换为日期时间vartype函数将变体转换为指定的类型并保存它visible属性控件的可见性wantreturns属性为true时,按回车键产生一个回车符;为false时,按下ctrl+enter才产生回车符write命令对有格式的文件,写一变量到文件组件中;对文本文件,写一个或多个值到文件中writeln命令执行write过程,然后输出一行结束标志widecharlentostring函数将ansi字符串转换为unicode字符串widecharlentostrwar函数将unicode字符串转换为ansi字符串变量widechartostring函数将unicode字符串转换为ansi字符串widechartostrvar函数将unicode字符串转换为ansi字符串变量保留字Pascal中规定了一批单词,给这些单词赋予特定的含义,在进行程序设计时不能把这些单词重新定义或用于其它目的。
Pascal中的常用字符串函数

1. 连接运算concat(s1,s2,s3…sn) 相当于s1+s2+s3+…+sn.例:concat(‘11’,’aa’)=’11aa’;2. 求子串。
Copy(s,I,L) 从字符串s中截取第I个字符开始后的长度为l的子串。
例:copy(‘abdag’,2,3)=’bda’3. 删除子串。
过程Delete(s,I,l) 从字符串s中删除第I个字符开始后的长度为l的子串。
例:s:=’abcde’;delete(s,2,3);结果s:=’ae’4. 插入子串。
过程Inse rt(s1,s2,I) 把s1插入到s2的第I个位置例:s:=abc;insert(‘12’,s,2);结果s:=’a12bc’5. 求字符串长度length(s) 例:length(‘12abc’)=56. 搜索子串的位置pos(s1,s2) 如果s1是s2的子串,则返回s1的第一个字符在s2中的位置,若不是子串,则返回0.例:pos(‘ab’,’12abcd’)=37. 字符的大写转换。
Upcase(ch) 求字符ch的大写体。
例:upcase(‘a’)=’A’8. 数值转换为数串。
过程Str(x,s) 把数值x化为数串s.例:str(12345,s); 结果s=’12345’9. 数串转换为数值。
过程val(s,x,I) 把数串s转化为数值x,如果成功则i=0,不成功则I为无效字符的序数例:val(‘1234’,x,I);结果x:=1234求长度len gth定义:functi on Length(S: String): Intege r;例子:varS: String;beginReadln (S);Writel n('"', S, '"');Writel n('length = ', Length(S));end.复制子串co py定义:functi on Copy(S: String; Index:Intege r; Count:Intege r): String;注意:S 是字符串类型的表达式。
pascal常用函数(较全)

pascal函数PASCAL内自带的函数,通常可以直接调用,特殊的需要调用数据库,如:used math 目录一、数学函数与过程二、字符串函数与过程三、标准函数四、各单元的函数与过程展开一、数学函数与过程过程:inc(i) 使i:=i+1;inc(i,b) 使i:=i+b;dec(i) 使i:=i-1;dec(i,b) 使i:=i-b;randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面。
函数:abs(x) 求x的绝对值。
例:abs(-3)=3 x为整数chr(x) 求编号x对应的字符。
例:chr(65)='A' chr(97)='a'chr(48)='0' x为非负整数ord(x) 求字符x对应的编号。
例:ord(‘A')=65 ord(‘a')=97 另外:ord(false)=0 ord(true)=1 x为字符或数字或布尔量sqr(x) 求x的平方。
例:sqr(4)=16 x为整数sqrt(x) 求x的正根。
例:sqrt(16)=4 (ps:负数是不能进行运算的,如果需要就要先取绝对值:sqrt(-4)是错的,应该为sqrt(abs(-4))结果为实数round(x) 求x的四舍五入。
例:round(4.5)=5 x实数trunc(x) 求x的整数部分。
例:trunc(5.6)=5 结果是integer型 x 为实数int(x) 求x的整数部分。
例:int(5.6)=5.0 结果是real型 x为实数frac (x) 求x的小数部分。
例:frac(5.6)=0.6 x为实数pred(x) 求x的前导。
例:pred(‘b')='a' pred(5)=4pred(true)=false x为字符或数字或布尔量succ(x) 求x的后继。
例:succ(‘b')='c' succ(5)=6succ(false)=true x为字符或数字或布尔量odd(x) 判断x是否为奇数。
循环结构(xinaosai)

循环结构语句
1、For 循环变量:=初值表达式 to 终值表达式 do 循环变量:=初值表达式 语句 2、For 循环变量:=初值表达式 downto 终值表达式 do 循环变量:=初值表达式 语句 3、While 布尔表达式 do 语句 4、Repeat 语句 until 布尔表达ODD( 奇函数ODD(X)
1、奇数指除不尽2的数。奇函数ODD(X) 、奇数指除不尽2的数。奇函数ODD( 指X为奇数时,函数的值为真,当X为偶数 为奇数时,函数的值为真,当X 时,函数的值为假。 2、例:ODD(-119)=TRUE 、例:ODD( 119) ODD(12) ODD(12)=FALSE 3、奇函数的自变量只可以是整数,其相对 应的函数值是布尔量。
平方函数SQR( 平方函数SQR(X)和平方根函数SQRT(X) 和平方根函数SQRT(
1、平方即指某个数自己乘以自己。 即SQR(X)=X*X=X2 SQR( 2、例:SQR(-5)=25 、例:SQR( ABS(10) ABS(10)=100 3、平方函数的自变量可以是整数或实数,其相对 应的函数值也是整数或实数。 4、平方根即指如果某个数X是由另一个正数Y*Y所 、平方根即指如果某个数X是由另一个正数Y*Y所 得,那么Y就是X的平方根。即SQRT( 得,那么Y就是X的平方根。即SQRT(X)=Y 5、例:SQRT(25)=5 、例:SQRT(25) SQRT(100) SQRT(100)=10 6、平方根函数的自变量可以是整数或实数,其相 对应的函数值也是整数或实数。
program text3; var i:real; begin for i:=1.5 to 2.5 do write(i:3); end.
1、For 循环变量:=初值表达式 to 终值表达式 do 语句 循环变量:=初值表达式 2、For 循环变量:=初值表达式 downto 终值表达式 do 语句 循环变量:=初值表达式
PASCAL中常用的函数和过程

随机数是指理论上没有规律可循、在指定范围内每个数的出现几率相等、无 法根据之前的数来预测下一个数的数列。一般随机数生成器的基本原理是:首先 初始化一个随机种子,其初始值可以是任意的整数;在每次获取随机数时,以随 机种子为基础进行某种特殊的运算,获得一个随机数并返回之,然后再对随机种 子进行某种运算,改变随机种子的值。这样,就可以生成许多比较随机的数,但 同一个初始值的随机种子将会生成完全相同的随机数列。
11、Upcase(ch:char) 函数:把字符转换成大写 12、random(x)函数:返回零到 X 之间的随机数。若不指定 X,结果是 0-1 之间 的随机实数。 13、inc(x)或者 inc(x,n)过程:把变量 x 加 1 或者加 n 14、dec(x)或 dec(x,n)过程:把变量 x 减 1 或者减 n 15、randomize 过程:随机数初始化 16、过程 Str(x,s):把数字 x 转换成字符串 s 17、过程 Val(s,v,code):把字符串 s 转换成数字 v,字符串 s 必须满足数的语 法,若 s 无效,其中非法字符的下标放在 code 中,否则,code 为零。
begin Writeln( Ord('a')); { 97 } Writeln(Chr(97)); { 'a' } end. 8、pred(x)和 succ(x) 函数 送回参数的前趋或后继数 9、length(s:string)函数:求字符串的长度 10、odd(x:longint)函数:判断表达式是否是奇数
2、取整函数 int(x) 定义:function Int(X: Real): Real; 注意:X 是实型数,返回值也是实型的;返回的是 X 的整数部分,也就是说,X 被截尾了(而不是四舍五入) 例子: var R: Real; begin R := Int(123.567); { 123.0 } R := Int(-123.456); { -123.0 } end.
Pascal函数大全全解

Pascal函数大全全解Pascal 函数大全1.数学函数函数标识符自变量类型意义结果类型 abs 整型、实型绝对值同自变量arctan 整型、实型反正切实型 cos 整型、实型余弦实型 exp 整型、实型指数实型 frac 整型、实型小数部分实型 int 整型、实型整数部分实型 ln 整型、实型自然对数实型 pi 无自变量圆周率实型 sin 整型、实型正弦实型sqr 整型、实型平方同自变量 sqrt 整型、实型平方根实型2.标量函数函数标识符自变量类型意义结果类型 odd 整型判断奇数布尔型 pred 离散类型求前趋同自变量 succ 离散类型求后继同自变量3.转换函数函数标识结果类自变量类型意义符型 chr byte型自变量对应的字符字符型 ord 离散类型自变量对应的序号 longint round 实型四舍五入 longint trunc 实型截断取整 longint4.杂类函数结果类函数标识符自变量类型意义型 random 无自变量 [0,1)之间的随机实数 real random word [0,自变量)之间的随机整数 word用一随机值初始化内部随机数产randomize 无自变量 longint 生器upcase 字符型使小写英文字母变为大写字符型Pascal语言函数集(含Delphi控件属性)abort 函数引起放弃的意外处理abs 函数绝对值函数addexitproc 函数将一过程添加到运行时库的结束过程表中 addr 函数返回指定对象的地址adjustlinebreaks函数将给定字符串的行分隔符调整为cr/lf序列align 属性使控件位于窗口某部分alignment 属性控件标签的文字位置 allocmem 函数在堆栈上分配给定大小的块 allowgrayed 属性允许一个灰度选择ansicomparestr 函数比较字符串(区分大小写) ansicomparetext 函数比较字符串(不区分大小写) ansilowercase 函数将字符转换为小写ansiuppercase 函数将字符转换为大写append 函数以附加的方式打开已有的文件 arctan 函数余切函数assignfile 函数给文件变量赋一外部文件名 assigned 函数测试函数或过程变量是否为空 autosize 属性自动控制标签的大小backgrounddi2001.jpg 属性背景色beginthread 函数以适当的方式建立用于内存管理的线程 bevelinner 属性控件方框的内框方式bevelouter 属性控件方框的外框方式bevelwidth 属性控件方框的外框宽度 blockread 函数读一个或多个记录到变量中 blockwrite 函数从变量中写一个或多个记录 borderstyle 属性边界类型borderwidth 属性边界宽度break 命令终止for、while、repeat循环语句 brush 属性画刷caption 属性标签文字的内容changefileext 函数改变文件的后缀chdir 函数改变当前目录checked 属性确定复选框选中状态chr 函数返回指定序数的字符closefile 命令关闭打开的文件color 属性标签的颜色columns 属性显示的列数comparestr 函数比较字符串(区分大小写) concat 函数合并字符串continue 命令继续for、while、repeat的下一个循环 copy 函数返回一字符串的子串cos 函数余弦函数ctl3d 属性是否具有3d效果cursor 属性鼠标指针移入后的形状date 函数返回当前的日期datetimetofiledate函数将delphi的日期格式转换为dos的日期格式datetimetostr 函数将日期时间格式转换为字符串 datetimetostring 函数将日期时间格式转换为字符串 datetostr 函数将日期格式转换为字符串dayofweek 函数返回星期的数值dec 函数递减变量值decodedate 函数将日期格式分解为年月日 decodetime 函数将时间格式分解为时、分、秒、毫秒 delete 函数从字符串中删除子串deletefile 命令删除文件diskfree 函数返回剩余磁盘空间的大小 disksize 函数返回指定磁盘的容量 dispose 函数释放动态变量所占的空间 disposestr 函数释放字符串在堆栈中的内存空间 ditherbackgrounddi2001.jpg?使背景色的色彩加重或减少50%dragcursor 属性当鼠标按下时光标的形状 dragmode 属性按动的作用方式dropdowncount 属性容许的显示数据项的数目 editmask 属性编辑模式enabled 属性是否使标签呈现打开状态 encodedate 函数将年月日合成为日期格式 encodetime 函数将时、分、秒、毫秒合成为时间格式endmargin 属性末尾边缘eof 函数对有类型或无类型文件测试是否到文件尾 eoln 函数返回文本文件的行结束状态erase 命令删除外部文件exceptaddr 函数返回引起当前意外的地址 exclude 函数从集合中删除一些元素 exceptobject 函数返回当前意外的索引 exit 命令立即从当前的语句块中退出 exp 函数指数函数expandfilename 函数返回包含绝对路径的字符串 extendedselect 属性是否允许存在选择模式,true时,multiselect才有意义extractfiledir 函数返回驱动器和路径 extractfileext 函数返回文件的后缀 extractfilename 函数返回文件名extractfilepath 函数返回指定文件的路径 fileage 函数返回文件已存在的时间 fileclose 命令关闭指定的文件filecreate 命令用指定的文件名建立新文件 filedatetodatetime 函数nbsp;将dos的日期格式转换为delphi的日期格式fileexists 函数检查文件是否存在filegatattr 函数返回文件的属性filegetdate 函数返回文件的dos日期时间标记 fileopen 命令用指定的存取模式打开指定的文件 filepos 函数返回文件的当前指针位置 fileread 命令从指定的文件读取filesearch 命令在目录中搜索指定的文件 fileseek 函数改变文件的指针filesetattr 函数设置文件属性filesetdate 函数设置文件的dos日期时间标记 filesize 函数返回当前文件的大小filewrite 函数对指定的文件做写操作 fillchar 函数用指定的值填充连续字节的数 findclose 命令终止findfirst/findnext序列 findfirst 命令对指定的文件名及属性搜索目录 findnext 命令返回与文件名及属性匹配的下一入口floattodecimal 函数将浮点数转换为十进制数 floattostrf 函数将浮点数转换为字符串 floattostr 函数将浮点数转换为字符串floattotext 函数将给定的浮点数转换为十进制数 floattotextfmt 函数将给定的浮点数转换为十进制数 flush 函数将缓冲区的内容刷新到输出的文本文件中 fmtloadstr 函数从程序的资源字符串表中装载字符串 fmtstr 函数格式化一系列的参数,其结果以参数 result 返回 font 属性设置字体format 函数格式化一系列的参数并返回pascal字符串 formatbuf 函数格式化一系列的参数formatdatetime函数用指定的格式来格式化日期和时间 formatfloat 函数指定浮点数格式frac 函数返回参数的小数部分freemem 函数按给定大小释放动态变量所占的空间 getdir 返回指定驱动器的当前目录getheapstatus 返回内存管理器的当前状态 getmem 建立一指定大小的动态变量,并将指针指向该处 getmemorymanager 返回内存管理器的入口点 glyph 函数按钮上的图象halt 停止程序的执行并返回到操作系统hi 返回参数的高地址位high 返回参数的上限值hint 属性提示信息int 返回参数的整数部分include 添加元素到集合中insert 在字符串中插入子串inttohex 将整型数转换为十六进制数inttostr 将整型数转换为字符串ioresult 返回最新的i/o操作完成状态 isvalidident 测试字符串是否为有效的标识符 items 属性默认显示的节点kind 属性摆放样式largechange 属性最大改变值layout 属性图象布局length 函数返回字符串的动态长度lines 属性缺省显示内容ln 函数自然对数函数lo 函数返回参数的低地址位loadstr 函数从应用程序的可执行文件中装载字符资源lowercase 函数将给定的字符串变为小写 low 函数返回参数的下限值 max 属性最大值 maxlength 属性最大长度 min 属性最小值 mkdir 命令建立一子目录move 函数从源到目标复制字节multiselect 属性允许同时选择几个数据项 name 属性控件的名字new 函数建立新的动态变量并设置一指针变量指向它 newstr 函数在堆栈上分配新的字符串 now 函数返回当前的日期和时间odd 测试参数是否为奇数onactivate 事件焦点移到窗体上时触发 onclick 事件单击窗体空白区域触发 ondblclick 事件双击窗体空白区域触发 onclosequery 事件使用者试图关闭窗体触发 onclose 事件窗体关闭后才触发oncreate 事件窗体第一次创建时触发 ondeactivate 事件用户切换到另一应用程序触发 ondragdrop 事件鼠标拖放操作结束时触发 ondragover 事件有其他控件从他上面移过触发 onmousedown 事件按下鼠标键时触发 onmouseup 事件释放鼠标键时触发onmousemove 事件移动鼠标时触发onhide 事件隐藏窗体时触发onkeydown 事件按下键盘某键时触发 onkeypress 事件按下键盘上的单个字符键时触发 onkeyup 事件释放键盘上的某键时触发 onpaint 事件窗体上有新部分暴露出来触发 onresize 事件重新调整窗体大小触发 onshow 事件在窗体实际显示之前瞬间触发 ord 返回序数类的序数outlinestyle 属性类型outofmemoryerror 引起outofmemory 意外pageindex 属性页索引pages 属性页paramcount 函数返回在命令行上传递给程序的参数数量paramstr 函数返回指定的命令行参数 pen 属性画刷设置pi 函数返回圆周率pipicture 属性显示图象pictureclosed 属性设置closed位图 pictureleaf 属性设置leaf位图pictureminus 属性设置minus位图 pictureopen 属性设置open位图pictureplus 属性设置plus位图pos 函数在字符串中搜索子串pred 函数返回先前的参数random 函数返回一随机函数randomize 函数用一随机数初始化内置的随机数生成器 read 函数对有格式的文件,读一文件组件到变量中;对文本文件,读一个或多个值到一个或多个变量中readln 函数执行read过程,然后跳到文件下一行 readonly 属性只读属性reallocmem 函数分配一动态变量rename 函数重命名外部文件renamefile 函数对文件重命名reset 函数打开已有的文件rewrite 函数建立并打开一新的文件rmdir 函数删除空的子目录round 函数将实数值舍入为整型值runerror 函数停止程序的执行scrollbars 属性滚动条状态seek 函数将文件的当前指针移动到指定的组件上 seekeof 函数返回文件的文件结束状态seekeoln 函数返回文件的行结束状态selectedcolor 属性选中颜色setmemorymanager 函数设置内存管理器的入口点 settextbuf 函数给文本文件指定i/o缓冲区 shape 属性显示的形状showexception 函数显示意外消息与地址 sin 函数正弦函数sizeof 函数返回参数所占的字节数smallchange 属性最小改变值sorted 属性是否允许排序sqr 函数平方函数sqrt 函数平方根函数startmargin 属性开始边缘state 属性控件当前状态str 函数将数值转换为字符串stralloc 函数给以null结束的字符串分配最大长度-1的缓冲区 strbufsize 函数返回存储在由stralloc分配的字符缓冲区的最大字符数strcat 函数将一字符串附加到另一字符串尾并返回合并的字符串strcomp 函数比较两个字符串strcopy 函数将一个字符串复制到另一个字符串中 strdispose 函数释放堆栈上的字符串strecopy 函数将一字符串复制到另一个字符串并返回结果字符串尾部的指针strend 函数返回指向字符串尾部的指针stretch 属性自动适应控件的大小strfmt 函数格式化一系列的参数stricomp 函数比较两个字符串(不区分大小写) stringtowidechar 函数将ansi字符串转换为unicode字符串 strlcat 函数将一字符串中的字符附加到另一字符串尾并返回合并的字符串strlcomp 函数以最大长度比较两个字符串 strlcopy 函数将一个字符串中的字符复制到另一个字符串中strlen 函数返回字符串中的字符数strlfmt 函数格式化一系列的参数,其结果中包含有指向目标缓冲区的指针strlicomp 函数以最大长度比较两个字符串(不区分大小写) strlower 函数将字符串中的字符转换为小写strmove 函数将一个字符串中的字符复制到另一个字符串中 strnew 函数在堆栈上分配一个字符串strpas 函数将以null结束的字符串转换为pascal类的字符串 strpcopy 函数将pascal类的字符串复制为以null结束的字符串 strplcopy 函数从pas cal类的最大长度字符串复制为以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 函数测试变体是否为nullvartodatetime 函数将给定的变体转换为日期时间vartype 函数将变体转换为指定的类型并保存它visible 属性控件的可见性wantreturns 属性为true时,按回车键产生一个回车符;为false时,按下ctrl+enter才产生回车符write 命令对有格式的文件,写一变量到文件组件中;对文本文件,写一个或多个值到文件中 writeln 命令执行write过程,然后输出一行结束标志widecharlentostring 函数将ansi字符串转换为unicode字符串widecharlentostrwar 函数将unicode字符串转换为ansi字符串变量widechartostring 函数将unicode字符串转换为ansi字符串widechartostrvar 函数将unicode字符串转换为ansi字符串变量自然对数:以e为底的对数,称自然对数~e 的一个定义是:如果级数1 + 1/1! + 1/2! + 1/3! + 1/4! + ... + 1/(n-1)! + ....是收敛的,我们就把他的和记做 e ;e 这个符号是欧拉在1727年首先引进的。
PASCAL常用的字符串函数解读

PASCAL常用的字符串函数求长度length定义:function Length(S: String): Integer;复制子串copy定义:function Copy(S: String; Index: Integer; Count: Integer): String;注意:S 是字符串类型的表达式。
Index和Count是整型表达式。
Copy 返回S中从Index 开始,Count个字符长的一个子串。
例子:var S: String;beginS := 'ABCDEF';S := Copy(S, 2, 3); { 'BCD' }end.插入子串insert定义:procedure Insert(Source: String; var S: String; Index: Integer);注意:Source 是字符串类型的表达式。
S 是任意长度字符串类型变量。
Index 是整型表达式。
Insert 把Source插在S中Index处。
如果结果字符串的长度大于255,那么255之后的字符将被删除。
例子:varS: String;beginS := 'Honest Lincoln';Insert('Abe ', S, 8); { 'Honest Abe Lincoln' }end.删除子串delete定义:procedure Delete(var S: String; Index: Integer; Count:Integer);注意:S 是字符串类型变量。
Index和Countare是整型表达式。
Delete 删除S中从Index 开始的Count个字符。
如果Index大于S的长度,则不删除任何字符;如果Count大于S 中从Index开始的实际字符数,则删除实际的字符数。
例子:vars: string;begins := 'Honest Abe Lincoln';Delete(s,8,4);Writeln(s); { 'Honest Lincoln' }Delete(s,9,10);Writeln(s); { 'Honest L' }end.字符串转为数值val定义: procedure Val(S; var V; var Code: Integer);在这里:S 是由一系列数字字符构成的字符串类型变量;。
free pascal函数

Addr(x) 函数 测变量地址
Append(f) 过程 打开一个存在的文本文件,并将文件指针指向文件末尾准备添加元素
Arctan(x) 函数 反正切
Assign(f,c) 过程 将字符串c所表示的外部文件名赋给文件变量f
Assigned(x) 函数 测试程序当中的指针或变量是否为空
Reset(f) 过程 打开文件,并将文件指针指向开始,并准备读数据
Rewrite(f) 过程 打开文件,并将文件指针指向开始,准备写资料
Rmdir(path) 过程 删除一个子目录
Round(x) 函数 求实数的近似值(四舍五入)
Runerror 过程 停止程序的运行
Scrollto 过程 滚动显示窗口的某部分内容
IOresult 函数 返回最后一次输入/出操作的结果状态
Length(s) 函数 返回一个字符串的长度
Ln(r) 函数 求自然对数
Lo(i) 函数 返回一个变量的低位字节
MkDir(path) 过程 建立一个子目录
Move(s,d,len) 过程 块传送
New(p) 过程 建立一个新的动态变量(如指针)
GetMem(p,i) 过程 分配变长的动态变量,并把块地址存放在一个指针变量中
Halt 过程 立即终止程序执行,返回turbo pascal 编辑器或dos
Hi(i) 函数 返回一个变量的高位字节
Insert(s,d,pos) 函数 在一个字符串中某一位置开始插入一个子串
Int 函数 取整数部分
楼上的回答大部分是对的,经过试验
MaxAvail 函数 返回最大内存空间
PASCAL函数过程表

PASCAL函数过程表目录:1、数学函数;2、所有单元;3、SYSTEM单元(不需要uses语句);4、DOS单元;5、CRT单元;6、其他单元;7、常用函数;8、不常用函数;9、退出方法。
1、数学函数求绝对值函数abs(x)定义:function Abs(X): (Same type as parameter);说明:X可以是整型,也可以是实型;返回值和X的类型一致例子:varr: Real;i: Integer;beginr := Abs(-2.3); { 2.3 }i := Abs(-157); { 157 }end.取整函数int(x)定义:function Int(X: Real): Real; 注意:X是实型数,返回值也是实型的;返回的是X的整数部分,也就是说,X被截尾了(而不是四舍五入)例子:var R: Real;beginR := Int(123.567); { 123.0 }R := Int(-123.456); { -123.0 }end.截尾函数trunc(x)定义:function Trunc(X: Real): Longint; 注意:X是实型表达式. Trunc 返回Longint型的X 的整数部分例子:beginWriteln(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)定义:function Round(X: Real): Longint; 注意:X是实型表达式. Round 返回Longint型的X 的四舍五入值.如果返回值超出了Longint的表示范围,则出错. 例子:beginWriteln(1.4, ' rounds to ', Round(1.4)); { 1 }Writeln(1.5, ' rounds to ', Round(1.5)); { 2 }Writeln(-1.4, 'rounds to ', Round(-1.4));{ -1 }Writeln(-1.5, 'rounds to ', Round(-1.5));{ -2 }end.取小数函数frac(x)定义:function Frac(X: Real): Real; 注意:X 是实型表达式. 结果返回X 的小数部分; 也就是说,Frac(X) = X - Int(_X). 例子:varR: Real;beginR := Frac(123.456); { 0.456 }R := Frac(-123.456); { -0.456 }end.求平方根函数sqrt(x)和平方函数sqr(x)定义:平方根:function Sqrt(X: Real): Real;注意:X 是实型表达式. 返回实型的X的平方根. 平方:function Sqr(X): (Same type as parameter);注意:X 是实型或整型表达式.返回值的类型和X的类型一致,大小是X的平方,即X*X. 例子:beginWriteln('5 squared is ', Sqr(5)); { 25 }Writeln('The square root of 2 is ',Sqrt(2.0)); { 1.414 }2、所有单元SYSTEM TP的运行库,包括常用的标准函数和过程,可以在程序中直接使用,不需USES 语句说明。
Pascal函数

1、数学函数绝对值函数abs(x)截尾函数trunc(x)四舍五入函数round(x) 取小数函数frac(x) 求平方根函数sqrt(x)和平方函数sqr(x) 2、所有单元 system tp的运行库,包括常用的标准函数和过程,可以在程序中直接使用,不需uses语句说明。
dos 具有日期、时间、目录查找、程序执行等功能crt 具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等功能printer 支持打印输出操作。
graph 高级图形软件包,支持多种图形适配器。
graph3 实现tp3.0的图形软件包。
turbo3 兼容tp3.0的源程序。
overlay 实现高级覆盖管理3、system单元system单元常用过程与函数abs(x) f 求变量的绝对值addr(x) f 测变量地址append(f) p 打开一个存在的文本文件,并将文件指针指向文件末尾准备添加元素arctan(x) f 反正切assign(f,c) p 将字符串c所表示的外部文件名赋给文件变量fassigned(x) p 测试程序当中的指针或变量是否为空blockread(f,d,num) p 读类型文件。
blockwrite(f,d,num) p 写无类型文件break p 中止或结束循环chdir(path) p 改变当前目录chr(x) f 求ascii码值为x的字符close(f) p 关闭文件concat(s1,s2...s3) f 字符串合并continue p 继续循环copy(s,pos,len) f 返回一个字符串的子串cos(x) f 余弦函数cseg f 返回cs寄存器的当前值dec(x) f x:=x-1delete(s,pos,len) p 删除一个字符串的子串dispose(p) p 释放一个动态变量dseg f 返回ds寄存器的当前值eof(f) f 判断文件是否结束eoln(f) f 判断文件类型中的一行是否结束erase(f) p 删除一个存在的外部文件。
pascal的基本语法单位

pascal的基本语法单位第⼀章、pascal介绍⼀、pascal的基本语法单位1、基本符号A——Z;a——z;0——9;+,-,*,/,=,<>,<=,>=,<,>,(,),[,],{,},:=,,,;,.,:,..,',^注意:pascal语⾔除了能使⽤以上规定的基本符号外,不得使⽤任何其它符号。
2、保留字AND,ARRAY,BEGIN,CASE,CONST,DIV,DO,DIWNTO,ELSE,END,FILE,FOR,FUNTION,GOTO,IF,LABEL,MOD,NIL,OF,OR,PACKED,PROCEDURE,PROGRAM,RECORD,注意:所起的⽂件名不能与保留字相同。
</P><P> 3、标识符以字母打头的字母数字串,长度⼩于等于8。
标准标识符(共三⼗九个):标准常量:false,true,maxint标准类型:integer,real,char,boolean,text标准⽂件:input,output标准函数:abs,arctan,chr,cos,eof,eoln,exp,ln,odd,ord,ored,round,sin,sqr,sqrt,succ,trunc标准过程:get,new,pack,page,put,read,readln,reset,rewrite,unpack,write, writeln</P><P>⼆、程序结构1、由三⼤部分组成:程序⾸部,说明部分,语句部分。
PROGRAM 程序名(input,output);{……} 解释CONSTpi=3.14159;VARr,l,s:real;BEGINwrite('input r:');read(r);l:=2*pi*r;write('l=',l,'s=',s);END;2、⼤量使⽤标点符号,保留字后不加标点符号(END除外)。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
pascal函数PASCAL内自带的函数,通常可以直接调用,特殊的需要调用数据库,如:used math 目录一、数学函数与过程二、字符串函数与过程三、标准函数四、各单元的函数与过程展开一、数学函数与过程过程:inc(i) 使i:=i+1;inc(i,b) 使i:=i+b;dec(i) 使i:=i-1;dec(i,b) 使i:=i-b;randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面。
函数:abs(x) 求x的绝对值。
例:abs(-3)=3 x为整数chr(x) 求编号x对应的字符。
例:chr(65)='A' chr(97)='a'chr(48)='0' x为非负整数ord(x) 求字符x对应的编号。
例:ord(‘A')=65 ord(‘a')=97 另外:ord(false)=0 ord(true)=1 x为字符或数字或布尔量sqr(x) 求x的平方。
例:sqr(4)=16 x为整数sqrt(x) 求x的正根。
例:sqrt(16)=4 (ps:负数是不能进行运算的,如果需要就要先取绝对值:sqrt(-4)是错的,应该为sqrt(abs(-4))结果为实数round(x) 求x的四舍五入。
例:round(4.5)=5 x实数trunc(x) 求x的整数部分。
例:trunc(5.6)=5 结果是integer型 x 为实数int(x) 求x的整数部分。
例:int(5.6)=5.0 结果是real型 x为实数frac (x) 求x的小数部分。
例:frac(5.6)=0.6 x为实数pred(x) 求x的前导。
例:pred(‘b')='a' pred(5)=4pred(true)=false x为字符或数字或布尔量succ(x) 求x的后继。
例:succ(‘b')='c' succ(5)=6succ(false)=true x为字符或数字或布尔量odd(x) 判断x是否为奇数。
如果是值为true,反之值为false。
例:odd(2)=false odd(5)=true x为整数power(a,n) 求a的n次方。
例:power(2,3)=8 {只有在开启math库时才可以使用}a,n为整数,但是不能求高精度数random(n) 取0~n-1之间的随机数(不能取到n) 。
n为整数max(x,y):返回x和y中的较大值。
x,y整数min(x,y):返回x和y中的较小值。
x,y整数二、字符串函数与过程1. 连接运算(函数)concat(s1,s2,s3…sn) 相当于s1+s2+s3+…+sn。
例:concat('11','aa')='11aa';2. 求子串。
(函数)Copy(s,I,L) 从字符串s中截取第I个字符开始,长度为L的子串。
例:copy('abdag',2,3)='bda'3. 删除子串。
(过程) Delete(s,I,l) 从字符串s中删除第I个字符开始,长度为l的子串。
例:s:='abcde';delete(s,2,3);结果s:='ae'4. 插入子串。
(过程)Insert(s1,s2,I) 把s1插入到s2的第I个位置。
例:s:='abc';insert('12',s,2);结果s:='a12bc'5. 求字符串长度(函数)length(s) 。
例:length('12abc')=56. 搜索子串的位置(函数)pos(s1,s2) 如果s1是s2的子串,则返回s1的第一个字符在s2中的位置,若不是子串,则返回0。
例:pos('ab','12abcd')=37. 字符的大写转换。
(函数)Upcase(ch) 求字符ch的大写体。
例:upcase('a')='A'8. 数值转换为数串。
(过程)Str(x,s) 把数值x化为数串s。
例:str(12345,s); 结果s='12345'9. 数串转换为数值。
(过程)val(s,x,I) 把数串s转化为数值x,如果成功则I=0,不成功则I为无效字符的序数。
例:val('1234',x,I);结果 x:=1234三、标准函数标准函数。
Turbo Pascal语言提供了自变量为整型量的标准函数有顺序函数算术函数和转换函数等。
标准函数是Turbo Pascal语言预先定义的,它们实际上是能完成特定功能的称步子程序的程序段。
每个标准函数都用一个标识符来标识,每个标准函数都能完成一个特定的功能,在程序中可以直接调用它们。
Turbo Pascal语言中某些标准函数与数学中的函数有相似之处。
一、整数类型函数整型是顺序类型,即所有的整型数都是按一定的顺序排列的。
如3的后序数是4,350的后序数是351。
以后介绍的布尔型、字符型、枚举类型和子界类型等都是顺序类型。
顺序函数可以对顺序类型数据进行操作,但要注意它们自变量的取值范围。
①前趋函数:Pred(x)函数值为x-l,例如:Pred (6)=5 Pred (-21)=-22②后继函数:Succ (x)函数值为x+l,例如:Succ (l5)=16 Succ (-114)= -113③绝对值函数:Abs (x)函数值为|X|,例如:Abs (-119)=119 Abs (101)=101④平方函数:Sqr (x)函数值为X*X,例如:Sqr (-5)=25 Sqr (l0)= 100以上四个函数的结果仍是整型数。
⑤奇函数:Odd (x),函数的结果为布尔型。
当X为奇数时,函数值为true;当X为偶数时,函数值为false,例如:Odd (13)= True Odd (16)= False⑥字符函数:Chr (X),函数值是序号的ASCII字符,属字符型,例如:Chr (65)=’A’ Chr (66)=’B’二、实数类型函数在下列算术函数中,X可以是实型或整型数的表达式。
对于函数Abs和Sqr,其结果类型和变量X的类型相同,其他算术函数的结果类型都是实型。
绝对值函数Abs(x):函数值为x的绝对值。
平方函数Sqr (x):函数值为x的平方。
小数函数Frac (x):函数值为x的小数部分。
整数函数Int (x):函数值为x的整数部分。
正弦函数Sin (x):函数值为x的正弦,其中,的单位为弧度。
余弦函数Cos (x):函数值为x的余弦,其中,的单位为弧度。
指数函数Exp (x):函数值为e^x。
对数函数Ln (X):函数值为x的自然对数。
平方正根根函数的Sqrt (x):函数值为x的平方正根。
注意:sqrt的值参x即使是整数,返回值也是实数。
如果要取整,要用函数trunc(在“数学函数与过程”里已经说明,这里不再说明)反正切函数Arctan(x):函数值为x的反正切,单位为弧度。
随机函数Random:无自变量时,函数值取(0,1)间的随机小数;有自变量且为Word类型时,函数值取(0,自变量)间的随机整数。
三、字符类型函数Turbo Pascal语言提供如下自变量为字符型的标准函数,其中Chr为字符型。
后继函数Succ (ch):例如,Succ (’8’)='9’ Succ (’E’)='F’ 对字符集的最后一个字符,Succ函数无意义。
前趋函数Pred (ch):例如,Pred (’7’)='6’ Pred (’B’)=' A’ 序数函数Ord (ch)::给出字符ch在ASCII字符集中的序号,结果为整型。
注意:Ord (’7’)<>7,正确的是:Ord (’7’)=Ord(’0’)+7=48+7=55 若ch是数字字符,则Ord (ch)-Ord ('0')是该数字字符的数值,例如:Ord (’7’)-Ord(’0’)=7前面介绍的字符函数Chr (i)是Ord (ch)的逆函数,例如:Chr(55)= ’7’ Chr (Ord(’A’))='A’四、布尔类型函数Turbo Pascal语言提供布尔型函数主要是几个字符型函数。
Ord (B) 例如:Ord (false)=0 Ord (true)=1。
四、各单元的函数与过程SYSTEM TP的运行库,包括常用的标准函数和过程,可以在程序中直接使用,不需USES语句说明。
DOS 具有日期、时间、目录查找、程序执行等功能CRT 具有屏幕模式控制、扩展键盘码、颜色、窗口、声音等功能PRINTER 支持打印输出操作。
GRAPH 高级图形软件包,支持多种图形适配器。
GRAPH3 实现TP3.0的图形软件包。
TURBO3 兼容TP3.0的源程序。
OVERLAY 实现高级覆盖管理一、SYSTEM单元ABS(X) F 求变量的绝对值ADDR(X) F 测变量地址APPEND(F) P 打开一个存在的文本文件,并将文件指针指向文件末尾准备添加元素ARCTAN(X) F 反正切ASSIGN(F,C) P 将字符串C所表示的外部文件名赋给文件变量F ASSIGNED(X) P 测试程序当中的指针或变量是否为空BLOCKREAD(F,D,NUM) P 读类型文件。
BLOCKWRITE(F,D,NUM) P 写无类型文件BREAK P 中止或结束循环CHDIR(PATH) P 改变当前目录CHR(X) F 求ASCII码值为X的字符CLOSE(F) P 关闭文件CONCAT(S1,S2...S3) F 字符串合并CONTINUE P 继续循环COPY(S,POS,LEN) F 返回一个字符串的子串COS(X) F 余弦函数CSEG F 返回CS寄存器的当前值DEC(X) F X:=X-1DELETE(S,POS,LEN) P 删除一个字符串的子串DISPOSE(P) P 释放一个动态变量DSEG F 返回DS寄存器的当前值EOF(F) F 判断文件是否结束EOLN(F) F 判断文件类型中的一行是否结束ERASE(F) P 删除一个存在的外部文件。
EXIT P 过程中止EXP(X) F 以E为底的指数函数FILEPOS(F) F 文件记录的当前位置FILESIZE(F) F 文件记录数FILLCHAR(D,LEN,DATE) P 填充数值或字符FLUSH(F) P 清空文件缓存区FRAC(X) F 取实形变量的小数部分FREEMEM(P,I) P 释放变长动态变量GETDIR(DRV,PATH) P 取当前盘,当前目录GETMEM(P,I) P 分配变长的动态变量,并把块地址存放在一个指针变量中HALT P 立即中止程序执行,返回TP编辑器或DOSHI(I) F 返回一个变量的高位字节INSERT(S,D,POS) F 在一个字符串中某一位置开始插入一个子串INT F 取整数部分IORESULT F 返回最后一次输入/出操作的结果状态LENGTH(S) F 取字符串的长度LN(R) F 求自然对数LO(I) F 返回一个变量的低位字节MAXAVAIL F 返回最大内存空间MEMAVAIL F 返回可用内存数目MKDIR(PATH) P 建立一个子目录MOVE(S,D,LEN) P 快传送NEW(P) P 建立一个新的动态变量ODD(X) F 判断一个变量的值是否为奇数OFS(X) F 侧变量偏移地址ORD(CH) F 求一个字符的ASCII码值PARAMCOUNT F DOS参数串长度PARAMSTR(N) F DOS参数串PI F 圆周率的值pos(str1,str2) f 测一个字符串中包含的另一个子串的开始位置pred(x) f 求前驱ptr(i) f 指针赋值random f 返回0~1之间的随机实数randomize p 初始化随机数发生器read/readln(f,x) p 读入/输入数据rename(f,str) p 给一个外部文件改名reset(f) p 打开文件,并将文件指针指向开始,并准备读数据rewrite(f) p 打开文件,并将文件指针指向开始,准备写资料rmdir(path) p 删除一个子目录round(x) f 求实数的近似数runerror p 停止程序的运行scrollto p 滚动显示窗口的某部分内容seek(f,n) p 将文件指针定位于文件f的第n个文件成分上seekrof(f) f 定位到文件尾seekroln(f) f 定位到行尾seg(n) f 测变量段地址settextbuf(f) p 将输入/出缓冲区与一个文本文件建立关联sin(x) f 正弦函数sizeof(x) f 测变量大小sptr f 返回sp寄存器的当前值sqr(x) f 平方sqrt(x) f 平方根sseg f 返回ss寄存器的当前值str(i,s) f 将一个整数转换成字符串succ(X) f 后继函数swap(x) f 交换一个变量的高位和低位字节trunc(x) f 截去实数的小数部分truncate(f) p 截去文件当前指针以后的内容upcase(ch) f 将小写字母转换成大写字母val(s,r,p) p 将一个字符串转换成数值writeln(f,x) p 输出二、dos单元getdate p 返回系统当前日期detftime p 返回最后一次写入的日期和时间gettime p 返回系统当前时间packtime p 转换系统日期和时间,封装成4个字节的长整形格式setdate p 设置系统当前日期setftime p 写入新的系统日期和时间,覆盖系统最后一次写入的系统日期和时间文件settime p 设置系统当前时间uppacktime p 将系统日期和时间转换成纪录格式diskfree f 返回指定磁盘可用剩余空间disksize f 返回指定磁盘的总容量get/setverity p 返回/设置dos状态下的磁盘读写标记fexpand f 返回函数名的全称fsearch f 在一个目录中查找文件fsplit f 将一个文件名分成目录、文件名、扩展名findfirst p 在当前目录或指定目录下查找第一个与给定属性相匹配的文件名findnext p 返回下一个满足匹配条件的文件名getfattr p 返回文件的属性setfattr p 设置文件属性gerintvec p 返回某个中断变量值intr p 执行软中断msdos p 执行dos 系统调用setintvec p 设定中断值exec p 通过一个特定命令行执行特定程序段keep p 中断程序的执行但仍驻留在内存中swapvectors p 用当前变量交换所有中断变量值dosexitcode f 回到子程序出口dosversion f 显示dos版本三、crt单元assigncrt(f) p 将文本文件f与显示器crt建立联系clreol p 清除当前行光标所在位置以后的字符clrscr p 清除当前窗口或屏幕,光标返回到左上角delay(t) p 等待t毫秒delline p 清除光标所在行上所有内容gotoxy(x,y) p 将光标移到屏幕某处highvideo p 选择高亮度显示字符insline p 在当前光标位置插入空行keypressed f 测定键盘输入状态lowvideo p 低亮度显示字符normvideo p 选择正常文本属性从光标所在位置开始显示字符nosound p 关闭内部扬声器readkey p 等待从键盘输入一个字符sound(hz) p 以hz指定的频率发声textbackground(soor) p 设置正文背景颜色textcolor(color) p 设置正文前景颜色textmode p 选择特定的文本显示模式wherex/y f 返回当前光标位置的坐标值window(x1,y1,x2,y2) p 在屏幕定义一个文本窗口四、其他单元chain(f) p 目标程序链接execute(f) p 执行目标程序mark(p) p 标记动态变量release(p) p 释放动态变量区srtinit p 屏幕初始化crtline p 汉字屏幕方式转换graphbackground(color) p 选择背景色graphcolormode p 中分辨率彩色图形方式,320*200彩色graphmode p 中分辨率黑白图形方式,320*200黑白graphwindow(x1,y1,x2,y2,color)p 定义图形方式窗口hires p 高分辨率单色图形方式,640*200黑白hirescolor(color) p 高分辨率彩色图形方式,640*200彩色palette(color) p 中分辨率彩色图形颜色组ovrpath(path) p 指定覆盖文件路径draw(x1,y1,x2,y2,color) p 画线intr(n,m) p 8086中断调用plot(x,y,color) p 画点random(integer) f 产生随机整数seg(x) f 测变量段地址colortable(c1,c2,c3,c4) p 重定义颜色组arc(x,y,radius,color) p 画圆弧circle(x,y,radius,color) p 画圆getpic(buffer,x1,x2,y1,y2) p 屏幕转储到屏幕putpic(buffer,x,y) p 缓冲器转储到屏幕getdotcolor(x,y) p 读点fillscreen(color) p 填充屏幕fillshape(x,y,fillcol,bordercol) p 填充一个区域五.math库单元在FP中,Math库为我们提供了丰富的数学函数。