pascal编程问题
用pascal编程,输入小于20个字母时,以空格结束,即输入"abcd "就取abcd的序号并相加.如何输入"abcd efg"就只取abcd的序号并相加.如何设计?
参考答案:用ord函数和read过程
判断空格
read(c);
if c=#32 then ……(退出,比如break)
也许你是repeat……until的,就
repeat
……
read(c);
……
until c<>#32;
用pascal编程,输入小于20个字母时,以空格结束,即输入"abcd "就取abcd的序号并相加.如何输入"abcd efg"就只取abcd的序号并相加.如何设计?
参考答案:用ord函数和read过程
判断空格
read(c);
if c=#32 then ……(退出,比如break)
也许你是repeat……until的,就
repeat
……
read(c);
……
until c<>#32;