Pascal常用函数和过程.ppt

inc(i) 使i:=i+1; 　　inc(i,b) 使i:=i+b; 　　dec(i) 使i:=i-1; 　　dec(i,b) 使i:=i-b; 　　randomize 随机数的种子函数，在每次设置随机数时都要把这个函数放在最前面。 　四、布尔类型函数 　　Turbo Pascal语言提供布尔型函数主要是几个字符型函数。 　　Ord (B) 例如：Ord (false)=0 Ord (true)=1abs(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为整数 　　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 ①前趋函数：Pred(x)函数值为x-l，例如： 　　Pred (6)=5 P