我用PASCAL编的，你可以自己翻译成其他语言。
VAR
str:string;{既然是一行字，一个字符串能装下}
i,total:integer;
BEGIN
total:=0;
readln(str);
for i:=1 to length(str) do
if str[i] in ['a'..'z']
then inc(total);
writeln(total);
END.
总觉得有问题，是不是这道题有什么特殊的地方？如果有，请指明
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024