作业帮 > 综合 > 作业

PASCAL 从键盘上输入一个英文句子,找出里面有几个字母A.

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/11 15:59:30
PASCAL 从键盘上输入一个英文句子,找出里面有几个字母A.
要简单一点的,12点后无效……
var s:string;
l,i:longint;
begin
readln(s); {输入s字符串}
l:=0; {l是A的个数,先清零}
for i:=1 to length(s) do {length(s)是求s的长度}
if s[i]='A' {如果是s[i]是'A',个数就加1}
then inc(l);
writeln(l); {输出个数}
end.
希望我的回答能帮到你.
再问: 运行下来怎么都是0个A啊?是不是哪里错了?
再答: 我试了一下都是对的呀。是不是你输入有问题啊,要大写的A哦。 我输入ABDXA 输出2 输入 AAGCDAAA 输出5