字符串函数的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的子串。
delete(大串。开始位置，个数）删除子串
例：s:='abcde';delete(s,2,3);结果s:='ae'
delete('1234567',5,2)='12347'
delete('abcded123',1,1)='bcded123'
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,如果成功则l=0,不成功则I为无效字符的序数
例：val('1234',x,I);结果 x:=1234
10.求字符序号。ord(a)求char型字符a的ASCII码。
例：ord('A')=65
