用LOGO语言解决字与表问题(好的加20分)

wwuukl2022-10-04 11:39:541条回答

用LOGO语言解决字与表问题(好的加20分)
1.将一个字中的所有数字抽出,按原顺序组成一个新字.如输入AB72CD3得到新字723.
2.将单表中的元素分成两个表,一个存放所有的纯数字元素,另一个存放剩下的元素.如输入[AB 12 CD 56 GF 34 AK1]得到表一[12 56 34];表二[AB CD GF AK1]
3*.第二小组几名同学的数学成绩为:AA 78、BB 100、 CC 56、 DD 90,请编程排出名次并按下列格式显示:名次 姓名 分数.(AA、BB、CC、DD均为人名)
4*.输入任意的数和字母,编程序把这些数和字母按从小到大顺序排列,输出时一个字母一个数字的组成小表.如输入[1 8 9 B A C 10 D],输出 [A 1] [B 8] [C 9] [D 10].
5*.将一个字中的相连的数字串变成顺序相反的数字串,相连的字母串变成顺序相反的字母串.如输入12ABC78应变成21CBA87.
最好在8月6日晚前做出来,(死任务哦.呜呜)

已提交,审核后显示!提交回复

共1条回复
工地小工 共回答了17个问题 | 采纳率100%
不好意思,我只会第1.2.5题.
1.TO A :W
IF EMPTY? :W [OP "]
IF NUMBER? FIRST :W [OP WORD FIRST :W A BF :W][OP A BF :W]
END                             (注意::W是一个字)
2.TO B :L :NL1 :NL2
IF EMPTY? :L [(SHOW :NL1 :NL2)STOP]
IF NUMBER? FIRST :L[B BF :L SE :NL1 FIRST :L :NL2][B BF :L :NL1 SE :NL2 FIRST :L]
END (注意:执行时:NL1和:NL2都给空表,:L是一个单表)
TO E :W :Z
IF EMPTY? :W [OP :Z]
IF NOT NUMBER? FIRST :W [OP WORD :Z (F :W ")]
OP E BF :W WORD FIRST :W :Z
END
TO F :W :Z
IF EMPTY? :W [OP :Z]
IF NUMBER? FIRST :W [OP WORD :Z (E :W ")]
OP F BF :W WORD FIRST :W :Z
END (注意:可以执行E也可以执行F,:Z给的值是空字.过程E和F是互相调用,不分主、子)
我在电脑上试过了,100%正确!
祝您学习进步!
1年前

相关推荐

logo语言怎么搞26个英文字母
logo语言怎么搞26个英文字母
N要大写,其他小写,最好是公式,没公式的话就以高度为64
陆续摇摆1年前1
tljkhdb 共回答了14个问题 | 采纳率85.7%
tt[abcdefghijklmNopqrstuvwxyz]
这一句话就可以了.
C式工作室为您解答,有疑请追问,无疑请采纳
请帮我写出logo语言画一个长为100的正方形的命令
huihuixiaolu1年前1
金静 共回答了11个问题 | 采纳率90.9%
fd 100
rt 90
fd 100
rt 90
fd 100
rt 90
fd 100