由于可以通过索引访问字符,因此可以使用变量循环遍历所有字符,这些字符将采用可能的索引值。例如,显示字符串 s 的所有字符代码的程序如下所示
<前>
for i := 1 to length(s) 做
writeln(s[i], ord(s[i]))
节目说明:
1) length(s)
函数求字符串的长度。第一个字符的索引是 1,最后一个字符的索引是 length(s)。循环变量i只会取值从1到length(s)。
2) 在每一行中,首先显示交易品种本身,然后是其代码,由内置函数ord()
返回
相同的枚举可以写得更短:
<前>
对于 c in s do
writeln(c, ord(c));
在这个片段中,循环头循环遍历所有字符 s,依次将它们放入变量 c 中。
Pascal 在处理字符串时的特点是字符串是可变对象。换句话说,我们可以改变字符串的单个字符。
例如,以下语句将起作用
<前>
s[5] := 'a';
您还可以根据需要更改的字符组成新字符串。
例如,替换所有字符“a”的程序到角色“b”看起来像这样:
<前>
阅读(S);
for i := 1 to length(s) 开始
如果 s[i] = 'a' 则 s[i] := 'b';
结尾;
writeln(s);
在这个例子中,我们循环遍历字符串 s 的所有字符。在循环体中,我们检查变量 s[i] 的值:如果字符与字符 'a' 匹配,则我们将其替换为 'b'。