pascal常用函数
pascal-函数和过程
procedure show(Var a:integer); 形式参数 A 是＿＿＿ 对应的实参必须是变量 变参与实参的关系是传地址 变参可作输入参数，有出口值表示过
程的返回值
例：下列程序的运行结果如何： program ex;
var i,j:integer;
procedure sample(x:integer;var y:integer); begin x:=x+2;y:=y+2; end;
程序 3： Program ex5-8; Var
Total,tatal:lonint; K:integer; Procedure njc(n:longint; var s:longint); Var i:integer; Begin S:=1; For i:=1 to n do S:=s*I; End; {===main===} Begin Total:=0; For k:=2 to 5 do
End; Begin
Write(‘Input 5 numbers : ‘); Readln(n1,n2,n3,n4,n5); T1 := n1; T1 := Max(t1,n2); T1 := Max(t1,n3); T1 := Max(t1,n4); T1 := Max(t1,n5); Writeln(‘Max number : ‘,t1); End. 输入数据：21 45 9 35 7 输出结果为： 2、程序 2 二、program ex7_4;
2.自定义过程：由程序员在程序中定义后再使用。给某个语句序列组成的子程序赋于 一个适当的名字。程序中凡是需要出现这个语句序列的地方，可以简单的写上子程序 的名字。这种完成一个操作的子程序称为过程；子程序的定义称为过程说明。过程说 明由过程首部和过程体组成，其形式如下：
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 顺序结构与基本数据类型
顺序结构与基本数据类型一、程序的三种基本结构1、顺序结构：按照语句的书写顺序，依次执行。
2、选择结构（分支结构）：根据给定的条件，判断成立与否，成立做一件事，不成立做另外一件事。
两件事必须做一件且只能做一件。
3、循环结构（重复结构）：重复做某件事。
3种：①计数循环：重复执行的次数确定；②当型循环：当条件成立时，反复做某件事；③直到型循环：反复做某件事，直到条件成立时为止。
二、PASCAL标准数据类型及函数：1、实型(real)表示方法：小数表示法和指数表示法（科学表示法）。
如：1.25(1.25e0),132.67(1.3267e+2),0.0025(2.5e-3),-1.56(-1.56e0),0.0(0e0) 实型量运算：+（加）、-（减）、*（乘）、/（除）实型量标准函数：abs(绝对值)，sqr(平方)，sqrt(开方)，sin(正弦)，cos(余弦),arctan(反正切),exp(以e为底的指数),ln(自然对数),trunc(取整),round(舍入取整)，int(取整)注：所有函数的自变量必须写在括号中。
例如：Sin2x 应写成sin(2*x) (a+b)2应写成sqr(a+b)Sin,cos函数的自变量应为弧度。
若是度，应转换为弧度。
例如：Sin32o15’应写成sin(32.15*3.14159/180)Tanx 应写成sin(x)/cos(x)e2.5应写成exp(2.5)lnx应写成ln(x) lgx 应写成ln(x) /ln(10)x y 应写成exp(y*ln(x))int直接取整数部分（其结果为实型）、trunc去掉小数部分，取其整数。
Round是将小数部分四舍五入后变为整数。
例如：trunc(1.2)=1 round(1.2)=1trunc(1.7)=1 round(1.7)=2trunc(-3.7)=-3 round(-3.7)=-42、整型（integer）正、负数和0.整型量运算：+（加）、-（减）、*（乘）、div（整除）、mod（取余）整型量标准函数：abs(绝对值)，sqr(平方)，pred(前导),succ(后继),odd(奇函数),chr(取字符)例如：pred(前导),取自变量前一个值。
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是否为奇数。
PASCAL语言函数集(含DELPHI控件属性)
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中的常用数学函数求绝对值函数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('5squared is',Sqr(5));{25}Writeln('The square root of2is',Sqrt(2.0));{1.414}Pascal函数实例标准数据类型的含义及符号(1)整型数的取值范围：-32768<=n<=32768;整型运算操作:+、-、*、div、mod;整型关系操作：=、<>、>=、<=，结果为布尔型；有关整型的标准函数：整型函数函数名函数值例前接函数pred(x)x-1pred(4)=3后继函数succ(x)x+1succ(-3)=-2绝对值函数abs(x)|x|abs(-1)=1平方函数sqr(x)x^2sqr(-5)=25奇函数odd(x)x为奇数时值为True odd(1)=truex为偶数时值为False odd(16)=false字符函数chr(x)序号为x的ASCII字符chr(65)=\'\'a\'\'a对应的序号65(2)实型数的绝对值取值范围：1E-38~1E+38;计算机实数的表示标准形式往往类如1.2E-8,-1234.56E+3等形式；实数范围比整数大，但实型数的运算速度比整形数慢，另外实型数在存储时会出现小的误差；实型的运算操作：+、-、*、/。
pascal delay函数
pascal delay函数
Pascal语言中的delay函数是用于在程序执行过程中暂停一段
时间的函数。
它通常用于创建简单的时间延迟，比如在动画或者游
戏开发中。
delay函数的语法如下：
pascal.
procedure Delay(Milliseconds: Longint);
这个函数接受一个参数，即要暂停的毫秒数。
在调用delay函
数时，程序会暂停执行指定的毫秒数，然后再继续执行后面的代码。
需要注意的是，delay函数在现代编程中并不常用，因为它会
导致程序在延迟期间无法执行其他任务，造成程序的阻塞。
在实际
开发中，通常会使用计时器或者多线程等技术来实现更灵活和高效
的延迟效果。
另外，需要特别注意的是，由于不同的Pascal编译器可能对delay函数的实现有所不同，因此在使用delay函数时需要注意兼
容性和可移植性的问题。
总的来说，delay函数是Pascal语言中用于在程序执行过程中暂停一段时间的函数，但在实际开发中需要谨慎使用，并考虑更灵活和高效的替代方案。
pascl 常用函数表
常用函数表（夏西小学信息学奥赛）⑴、求绝对值函数abs(x)例如： abs(-2.3); { 2.3 } abs(-157); { 157 }abs(85); { 85 } abs(99.9) { 99.9 }⑵、取整函数int(x)例如：int(123.567); { 123.0 } int(-123.456); { -123.0 } int(-13.567); { -13.0 } int(45.65); { 45.0 }⑶、截尾函数trunc(x)例如：trunc(1.4) { 1 } trunc(1.5) { 1 } trunc(-1.4) { -1 } trunc(-1.5) { -1 }⑷、四舍五入函数round(x)例如：round(1.4) { 1 } round(-1.4) { -1 } round(9.456) { 9 } round(-9.544) { -10 }⑸、取小数函数frac(x)例如：frac(123.456) { 0.456 } frac(-123.456) { -0.456 }⑹、求平方根函数sqrt(x)和平方函数sqr(x)例如：sqrt(64) { 8 } sqr(8) { 64 }⑺、随机函数random：随机产生一个0～1（不含1）之间的小数。
例如:100*random 随机产生{0～100范围内的小数}50*random 随机产生{0～50范围内的小数}10+10*random 随机产生{10～19范围内的小数}trunc(100*random) 随机产生0～99之间的整数50+trunc(100*random) 随机产生50～99之间的整数⑻、求字符串长度函数length例如：length(‘asdf’){ 4 } length(‘12+45＝’) { 6 }⑼、复制子串或求子串的函数copy例如：copy(‘window’,4,3) { dow } copy(‘123+78=’,5,2) { 78 }⑽、插入子串或插入字符串insert例如：若st2:= ‘wins’;执行insert(‘dow’,st2,4)后st2的值是‘windows’⑾、删除子串delete例如：若st=‘excel’;执行delete(st,4,2)后st的值是‘exc’⑿、字符串转为数值val例如：val(‘359’,a,c1)执行后将使变量a得到数值359（可参加四则运算）val(‘124.32’,b,c2)执行后将使变量b得到数值124.32（可参加四则运算）val(‘adb’,c,c3)执行后，c3将会出现错误值。
pascal语言中的过程及函数
Pascal 过程与函数Pascal中的例程有两种形式：过程和函数。
理论上说，过程是你要求计算机执行的操作，函数是能返回值的计算。
两者突出的不同点在于：函数能返回计算结果，即有一个返回值，而过程没有。
两种类型的例程都可以带多个给定类型的参数。
不过实际上函数和过程差别不大，因为你可以调用函数完成一系列操作，跳过其返回值(用可选的出错代码或类似的东西代替返回值)；也可以通过过程的参数传递计算结果（这种参数称为引用，下一部分会讲到）。
下例定义了一个过程、两个函数，两个函数的语法略有不同，结果是完全相同的。
procedure Hello;beginShowMessage ('Hello world!');end;function Double (Value: Integer) : Integer;beginDouble := Value * 2;end;10] of Integer;X, I: Integer;beginType ofvtInteger: Result :=Result + Args [I].VInteger;vtBoolean:if Args [I].VBoolean thenResult := Result + 1;vtChar:Result := Result + Ord (Args [I].VChar);vtExtended:Result := Result + Args [I].VExtended^;vtString, vtAnsiString:Result := Result + StrToIntDef ((Args [I].VString^), 0);vtWideChar:Result := Result + Ord (Args [I].VWideChar);vtCurrency:Result := Result + Args [I].VCurrency^;end;.private{ Private declarations }IP: IntProc;X: Integer;end;学完下一章，你会更清楚地了解这段代码的意思，目前只要能知道怎样添加过程类型定义、怎样修改相应的代码就行了。
pascal replace用法
pascal replace用法Pascal是一种广泛应用于程序设计和开发的编程语言，其中有一种非常常用的功能是replace函数。
replace函数可以帮助我们在字符串中替换指定的子串，从而实现字符串的修改和处理。
在Pascal中，replace函数的用法非常简单，但是非常实用。
接下来我们就来详细介绍一下Pascal中replace函数的用法。
在Pascal中，replace函数的语法如下所示：```pascalfunction Replace(const S, OldPattern, NewPattern: string): string;```其中，S是原始字符串，OldPattern是要被替换的子串，NewPattern是要替换成的子串。
replace函数会在原始字符串S中查找OldPattern，并将其替换为NewPattern，然后返回替换后的新字符串。
下面我们通过一个简单的示例来演示replace函数的用法：```pascalprogram ReplaceDemo;varS: string;beginS := 'Hello, World!';S := Replace(S, 'World', 'Pascal');writeln(S);end.```在这个示例中，我们首先定义了一个字符串S，并将其赋值为'Hello, World!'，然后使用replace函数将字符串S中的'World'替换为'Pascal'，最后输出替换后的字符串。
运行程序后，我们会得到输出结果为'Hello, Pascal!'，说明replace函数成功地将'World'替换为'Pascal'。
除了简单的字符串替换，replace函数还可以进行更复杂的操作。
比如，我们可以将一个字符串中的多个不同的子串都替换为指定的新子串。
Pascal函数 和过程速查手册
Pascal函数和过程速查手册函数不能做为语句单独使用，多出现在条件和：＝的右边位置；过程无返回值，必须做为语句单独使用ABS(-5);错A:=ABS(-5);对FILLCHAR(W,SIXZEOF(W),0);对W:=FILLCHAR(W,SIXZEOF(W),0);错Pascal把常用的一些运算定义为系统标准函数，简称为标准函数；标准函数的名字都是预定义标识符；引用一个函数就称为函数调用，调用时只要在程序中写出某一函数名以及函数所需要的参数，系统就会自动运算并得出结果，例如：abs(-123)将返回123。
Pascal的标准函数共有１７个，可分为四类：算术函数、转换函数、顺序函数及逻辑判断函数。
一、算术函数（１）、求绝对值－ABS：是英文单词absolute（绝对）的缩写，ABS(x)表示求x的绝对值例如：PROGRAM EX;Var a:integer;b:real;BEGINa=-34.5;b=234.5;write(abs(a):5:1,' ',abs(b):5:1); {将输出34.5 234.5}readln;END.（２）、反正切函数－ARCTAN：ARCTAN(x)表示求x的反正切函数值，返回值为real型例如：PROGRAM EX;Var a:integer;b:real;BEGINa=1;b=1.0;write(abs(a):6:4,' ',abs(b):6:4); {将输出0.7854 0.7854}readln;END.（３）、余弦函数－COS、正弦函数－SIN：COS(x)表示求x的余弦值；SIN(x)表示求x的余弦值。
这里的x必须为弧度，不能直接使用角度单位的量。
如果x为角度数，可以用后面的方式转换：x*3.14/180（４）、指数函数－EXP、自然对数函数－LN：EXP是英文单词exponent（指数）的缩写，EXP(x)表示求以e为底x为指数的函数值，即E X；LN是英文单词logarithrm（自然对数）的缩写，LN(x)表示求x的自然对数，即LOG e X（５）、平方函数－SQR、正平方根函数－SQRT：SQR是英文单词square（平方）的缩写；SQRT是英文单词square root（平方根）的缩写几点说明：Pascal中无幂运算，要求X Y可以用后面的公式：X Y=e YLNX(X>0)求常用对数可用公式：logX=lnX/ln10。
pascal语言中function和procedure -回复
pascal语言中function和procedure -回复Pascal是一种结构化的编程语言，由Niklaus Wirth在1970年代初开发。
它的目标是提供一种简洁而清晰的方式来编写可读性强且易于维护的程序。
在Pascal中，function和procedure是两个重要的概念，用于定义子程序以进行代码的模块化和重用。
本文将详细介绍function和procedure在Pascal语言中的特性和用法。
一、Function的概念和用法1.1 Function的定义Function是一种子程序，在Pascal中用于执行并返回一个值。
它的定义与过程（procedure）类似，但有一个返回类型。
返回类型可以是内置的数据类型（如整数、实数、布尔值等）或用户自定义的数据类型。
1.2 Function的语法在Pascal中，函数的定义使用函数头和函数体来表示。
函数头包括函数名、形式参数列表和返回类型。
函数体包括函数的实现代码。
函数头的一般格式如下所示：function <函数名>(<形式参数列表>): <返回类型>;1.3 Function的实例下面是一个计算圆的面积的函数的示例：function CalculateArea(radius: Real): Real;beginCalculateArea := Pi * radius * radius;end;在这个示例中，函数名为CalculateArea，形式参数列表包括一个类型为Real的参数radius，返回类型为Real。
函数体中的代码计算圆的面积并将结果返回。
1.4 Function的调用要调用一个函数，在函数名后面添加相应的实际参数。
实际参数的数量和类型必须与函数定义中的形式参数列表匹配。
下面是一个调用CalculateArea函数的示例：area := CalculateArea(3.14);这个示例将计算半径为3.14的圆的面积，并将结果赋给变量area。
Pascal语言基础知识
Pascal语言基础知识1、输入矩形的边长，分别输出周长、面积值。
2、输入两个整数，输出它们的平方和它们的平方根。
3、输入两个整数，输出它们相除的整数商（整除值）以及余数。
4、输入一个时间秒数，分别将其换算为下述时间单位输出：小时，天，星期。
三、Pascal数据类型简单类型、构造类型和指针类型，其中简单类型可以分为标准类型（整型、实型、字符型和布尔型）和自定义类型（枚举型和子界型），构造类型可以分为数组类型、集合类型、记录类型和文件类型。
这些数据类型中除了指针类型是动态数据类型外，其他的都是静态数据类型。
在这些数据类型中简单类型都是有序类型，除了实型以外的简单类型都是顺序类型，所谓顺序类型就是他们的值不仅是有序的而且是有顺序号。
在这里主要介绍整型、实型、字符型和布尔型四种常用的数据类型。
1.整型一个整型数据用来存放整数。
Turbo Pascal支持五种预定义整型，它们是shortint（短整型）、integer（整型）、longint（长整型）、byte（字节型）和word（字类型），Turbo Pascal 分别用相同的名字作为他们的表识符。
每一种类型规定了相应的整数取值范围以及所占用的内存字节数。
类型数值范围占字节数格式短整型shortint -128..1281带符号8位整型integer -32768..32767 2带符号16位长整型longint -2147483648..2147483647 4带符号32位字节型byte 0..255 1带符号8位字类型word 0..65535 2带符号16位Turbo Pascal规定了两个预定义整型常量表识符maxint和maxlonint，他们各表示确定的常数值，maxint为32767，longint为2147483647，他们的类型分别是integer 和longint。
2.实型一个实型数据用类存放实数。
Turbo Pascal支持五种预定义实型，它们是real（基本实型）、single（单精度实型）、double（双精度实型）、extended（扩展实型）、comp（装配实型），Turbo Pascal分别用相同的名字作为他们的表识符。
pascal函数大全
pascal函数大全pascal函数编辑本段一、数学函数：Inc(i) 使i:=i+1; （在free pascal中，它是过程，不能再将值赋给变量，也不能写在语句中直接调用）dec(i) 使i:=i-1; （在free pascal中，它是过程，不能再将值赋给变量，也不能写在语句中直接调用）Abs(x) 求x的绝对值例：abs(-3)=3Chr(x) 求编号x对应的字符。
例：Chr(65)=’A’chr(97)=’a’chr(48)=’0’Ord(x) 求字符x对应的编号。
例:ord(‘A’)=65 ord(‘a’)=97 另外：ord(false)=0 ord(true)=1 Sqr(x) 求x的平方。
例：sqr(4)=16Sqrt(x)求x的开方. 例：sqrt(16)=4round(x) 求x的四舍五入例：round(4.5)=5 结果是integer型trunc(x) 求x的整数部分例：trunc(5.6)=5 结果是integer型int(x) 求x的整数部分例int(5.6)=5.0 结果是real型frac (x)求x的小数部分例frac(5.6)=0.6 （在free pascal中想看小数型式的结果，在输出时应指定场宽）pred(x) 求x的前导pred(‘b’)=’a’pred(5)=4 pred(true)=falsesucc(x) 求x的后继succ(‘b’)=’c’succ(5)=6 succ(false)=trueodd(x) 判断x是否为奇数。
如果是值为true，反之值为false. Odd(2)=false odd(5)=truepower(a,n) 求a的n次方power(2,3)=8 {只有在开启math库时才可以使用}random 取0~1之间的随机数（不能取到1）randomize 随机数的种子函数,在每次设置随机数时都要把这个函数放在最前面.Fillchar(a,size(a),0) 数组初始化，即把数组a的值全部置为0 {赋成布尔型变量也可以}SHR: x SHR n 把x换成二进制后向右移n位，相当于把x 除以2nSHL: x SHL n把x换成二进制后向左移n位，相当于把x 乘以2n编辑本段二、字符串函数1. 连接运算concat(s1,s2,s3…sn) 相当于s1+s2+s3+…+sn.例：concat(‘11’,’aa’)=’11aa’;2. 求子串。
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中的常用数学函数求绝对值函数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 }。