文件名称：数组类型的应用-机器视觉算法与应用01
文件大小：1.48MB
文件格式：PDF
更新时间：2024-06-28 04:31:09
PASCAL
四、数组类型的应用 例 3 输入一串字符,字符个数不超过 100,且以"."结束。 判断它们是否构成回文。 分析：所谓回文指从左到右和从右到左读一串字符的值是一样的，如 12321,ABCBA,AA 等。先读入要判断的一串字 符（放入数组 letter 中），并记住这串字符的长度，然后首尾字符比较，并不断向中间靠拢，就可以判断出是否为回 文。 源程序如下： program ex5_5; var letter : array[1..100]of char; i,j : 0..100; ch : char; begin {读入一个字符串以'.'号结束} write('Input a string:'); i:=0;read(ch); while ch<>'.' do begin i:=i+1;letter[i]:=ch;