pascal常函数(较全).docVIP

pascal函数 PASCAL内自带的函数，通常可以直接调用，特殊的需要调用数据库，如：used math 目录 一、数学函数与过程 二、字符串函数与过程 三、标准函数 四、各单元的函数与过程 一、SYSTEM单元 二、dos单元 三、crt单元 四、其他单元 五.math库单元 一、SYSTEM单元 二、dos单元 三、crt单元 四、其他单元 五.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)=4 pred(true)=false x为字符或数字或布尔量 　　succ(x) 求x的后继。例：succ(‘b)=c succ(5)=6 succ(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)=5 　　6. 搜索子串的位置 （函数）pos(s1,s2) 如果s1是s2的子串 ，则返回s1的第一个字符在s2中的位置，若不是子串，则返回0。 　　例：pos(ab,12abcd)=3 　　7. 字符的大写转换。（函数）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语言预先