主题：小学奥赛题
wx.psfx
[专家分：10] 发布于 2007-10-17 11:09:00
一、在２、３、５、７、９这五个数字中，选取四个数字组成被３和５除都余２的四位 数。这样的四位数有哪些。
二、Ａ、Ｂ、Ｃ、Ｄ、Ｅ、Ｆ、Ｇ七人去旅游。每三人合照一张相片。但Ｂ与Ｅ两人不 愿在同一张照片上出现，问他们共照了多少张照片？每张照片上都有谁？
三、一根木棒分成六段，现有红、兰、黄、绿四色油漆用来分别涂各段，如果相邻的两 段不能用相同颜色，问共有多少中不同的涂法？并分别打印出它们各段的颜色（分 别用Ｒ、Ｂ、Ｙ、Ｇ代表这四种颜色）。
回复列表 （共10个回复）
沙发
moz [专家分：37620] 发布于 2007-10-17 12:20:00
套用[url=http://www.programfan.com/club/post-128367.html]排列组合[/url]
板凳
wx.psfx [专家分：10] 发布于 2007-10-17 12:37:00
谢谢！！
3 楼
wx.psfx [专家分：10] 发布于 2007-10-17 12:41:00
排列组合问题看不太懂．一个字晕！
4 楼
wx.psfx [专家分：10] 发布于 2007-11-01 09:02:00
这么久都没人解答啊！各位高手帮帮我．
5 楼
Matodied [专家分：7560] 发布于 2007-11-01 11:23:00
排列组合都不会，笨！
6 楼
wx.psfx [专家分：10] 发布于 2007-11-05 10:07:00
[em8]我是初学者，望各位大虾赐教！
7 楼
wx.psfx [专家分：10] 发布于 2007-11-05 10:20:00
你要是会的话，就做给我看看。
8 楼
007bond [专家分：540] 发布于 2007-11-07 17:07:00
1.
for i=1 to 5:read a1(i):next i
data 2,3,5,7,9
for a=1 to 5
for b=1 to 5
for c=1 to 5
for d=1 to 5
if a=b or a=c or a=d or b=c or b=d or c=d then 10
w=a1(a)*1000+a1(b)*100+a1(c)*10+a1(d)
if w mod 3=2 and w mod 5=2 then ?w
10 next d,c,b,a
end
2.
s=0
for a=1 to 7
for b=1 to 7
for c=1 to 7
if a=b or b=c or a=c then 10
if a*b=10 or a*c=10 or b*c=10 then 10
?chr$(a+64);chr$(b+64);chr$(c+64):s=s+1
10 next c,b,a
?s
end
3.for i=1 to 4:read a1$(i):next i
data R,B,Y,G
for a=1 to 4
for b=1 to 4
for c=1 to 4
for d=1 to 4
if a=b or b=c or c=d then 10
?a1$(a);a1$(b);a1$(c);a1$(d)
10 next d,c,b,a
end
9 楼
hxy_anhui [专家分：320] 发布于 2009-01-29 19:33:00
1.
CLS
FOR I = 1 TO 5
READ A(I)
NEXT I
FOR I = 1 TO 5
FOR J = 1 TO 5
FOR K = 1 TO 5
FOR L = 1 TO 5
IF I <> J AND I <> K AND I <> L AND J <> K AND J <> L AND K <> L THEN
IF (A(I) * 1000 + A(J) * 100 + A(K) * 10 + A(L)) MOD 3 = 2 THEN
IF (A(I) * 1000 + A(J) * 100 + A(K) * 10 + A(L)) MOD 5 = 2 THEN
PRINT A(I) * 1000 + A(J) * 100 + A(K) * 10 + A(L);
END IF
END IF
END IF
NEXT L
NEXT K
NEXT J
NEXT I
DATA 2, 3, 5, 7, 9
END
2.
FOR I = 1 TO 7
FOR J = 1 TO I
IF I <> J THEN
IF CHR$(64 + I) + CHR$(64 + J) <> "BE" THEN
PRINT CHR$(64 + I); " HE "; CHR$(64 + J),
END IF
END IF
NEXT J
NEXT I
END
10 楼
电脑高手 [专家分：0] 发布于 2009-02-05 21:58:00
我是一名小虾，望各位大侠指教！
我来回复
您所在位置：