4个回答
展开全部
在这里贴答案肯定会被封的,你的私信不能用,我将EXCEL中生成的代码贴 出来吧:
按ALT+F11,插入模块,输入以下代码,如复制粘贴请删除多余内容。F5运行
Sub Macro1()
Dim arr(8) As String
arr(0) = "马"
arr(1) = "羊"
arr(2) = "牛"
arr(3) = "鸡"
arr(4) = "狗"
arr(5) = "猪"
arr(6) = "鼠"
arr(7) = "猴"
arr(8) = "龙"
x = 1
For i = 0 To 5
For j = i + 1 To 6
For k = j + 1 To 7
For l = k + 1 To 8
Cells(x, 1) = arr(i) & arr(j) & arr(k) & arr(l)
x = x + 1
Next l, k, j, i
End Sub
共有126组。
按ALT+F11,插入模块,输入以下代码,如复制粘贴请删除多余内容。F5运行
Sub Macro1()
Dim arr(8) As String
arr(0) = "马"
arr(1) = "羊"
arr(2) = "牛"
arr(3) = "鸡"
arr(4) = "狗"
arr(5) = "猪"
arr(6) = "鼠"
arr(7) = "猴"
arr(8) = "龙"
x = 1
For i = 0 To 5
For j = i + 1 To 6
For k = j + 1 To 7
For l = k + 1 To 8
Cells(x, 1) = arr(i) & arr(j) & arr(k) & arr(l)
x = x + 1
Next l, k, j, i
End Sub
共有126组。
更多追问追答
追问
写的是什么
6肖复式4才15组,怎么9肖复式4事128呢
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
就是一个简单的排列组合问题,9个里面选4个,无顺序的排列,(1×2×3×4×5×6×7×8×9)÷(1×2×3×4×5)÷(1×2×3×4)=126
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
马羊牛鸡、狗猪鼠龙,是四个一组吧,没有重复吧。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
猪马牛羊,鸡龙狗猴,龙鼠狗猪
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询