pascal语言 从键盘输入任意一个字符,判断并输出是大写字母、小写字母、数字还是其它特殊字符 要有分析

如题所述

var
a:char;
begin {开始}
readln(a); {读取字符}
if (ord(a)>=48)and(ord(a)<=57) then write('number'); {当48<=它的序列号<=57时,它是数字}
if (ord(a)>=65)and(ord(a)<=90) then write('big letter'); {当65<=它的序列号<=90时,它是大写字母}
if (ord(a)>=97)and(ord(a)<=122) then write('small letter') {当97<=它的序列号<=122时,它是小写字母}
else write('other character'); {其它的话,它是其它字符}
end. {结束}
温馨提示:答案为网友推荐,仅供参考
第1个回答  2010-10-31
用ASC码,case语句。
http://wenku.baidu.com/view/7bd1b8eb19e8b8f67c1cb952.html(这是ASC码表的连接)只看十进制的就行了。
比如读入了a,存在c这个char型变量中。
d:=ord(c);
就会把a的ASC码存在d中,然后用case判断就好了。
第2个回答  2010-11-02
也可以预存集合类型判断
相似回答