妖精娃娃cc
幼苗
共回答了17个问题采纳率:94.1% 举报
第一题:
变量:a:longint;str:string;
1、读入字符串,用length求出str长度
2、a赋初值0
3、检查第一个字符,若为字母,a:=a+1,否则进行以下步骤:
用for语句对字符串逐个检查,如某字符不为字母且它的下一个字符是字母,则a:=a+1.
4、输出a
第二题
变量:a,b:longint;str1,str2:string;
1、读入str1并求其长度
2、a赋为0
3、再用for语句对str1逐个检查,如果为数字,则将其加到str2中,insert或+都可以.如果不为数字,则进行以下步骤:(1)用val语句把str2中的数字调到b(2)将str2清空(3)比较a、b大小,若a
1年前
5