主题：求教两道题，多谢各位出手相助！
wdzrdr
[专家分：0] 发布于 2005-09-28 15:56:00
一、给你10个英语单词，它们分别是：PEN、SCHOOL、BOOK、CLOCK、AIR、COCK、STUDENT、TEA、COMPUTER、BALL，要求编程打印出所有以字母C开头或以字母K结尾的单词，程序中数据的读取用READ/DATA语句来完成。
二、假设口袋里放着12个彩色的球，其中3个是红的，3个是白的，另外6个全是黑的，现在从口袋中一次取出其中的任意8个球，请问有多少种不同的取法？并给出具体的取法。[em10]
回复列表 （共7个回复）
沙发
moz [专家分：37620] 发布于 2005-09-28 16:10:00
1.
data PEN、SCHOOL、BOOK、CLOCK、AIR、COCK、STUDENT、TEA、COMPUTER、BALL，
for......
read.....
if left$(,1)="C"or right$(,1)="K" then print .....
next
2.
for red=0 to 3
for white=0 to 3
black=8-red-white
if black<=6 then print .......
next white,red
板凳
wdzrdr [专家分：0] 发布于 2005-09-28 16:13:00
MOZ专家，可不可以回复得完整一些，只给些骨干，我啃不懂啊。谢谢！
3 楼
wdzrdr [专家分：0] 发布于 2005-09-28 16:17:00
第二道题我已经明白，第一题的FOR语句和READ语句后面不清楚该填什么？
4 楼
moz [专家分：37620] 发布于 2005-09-28 16:37:00
10个单词就是for i=1 to 10
字符串操作就是read a$
5 楼
飞鸟12 [专家分：2830] 发布于 2005-09-29 12:36:00
CLS
DATA PEN,SCHOOL,BOOK,CLOCK,AIR,COCK,STUDENT,TEA,COMPUTER,BALL,$
READ x$
WHILE x$ <> "$"
IF LEFT$(x$, 1) = "C" OR RIGHT$(x$, 1) = "K" THEN PRINT x$
READ x$
WEND
END
BOOK
CLOCK
COCK
COMPUTER
6 楼
wdzrdr [专家分：0] 发布于 2005-09-29 14:00:00
多谢“MOZ”和“飞鸟12”两位仗义相助！
7 楼
spray [专家分：180] 发布于 2005-09-30 06:13:00
请勿使用空泛、模糊的标题，最好具体、明确、直接点明所要问的问题。参见版副def2005-9-2的帖子《在论坛里我根本就不理会的求助帖子》。
我来回复
您所在位置：