正文

數(shù)字排列組合軟件app（數(shù)字排列組合軟件）

發(fā)布時間：2023-05-23 22:30:08 稿源：創(chuàng)意嶺閱讀： 86

大家好！今天讓創(chuàng)意嶺的小編來大家介紹下關于數(shù)字排列組合軟件app的問題，以下是小編對此問題的歸納整理，讓我們一起來看看吧。

開始之前先推薦一個非常厲害的Ai人工智能工具，一鍵生成原創(chuàng)文章、方案、文案、工作計劃、工作報告、論文、代碼、作文、做題和對話答疑等等

只需要輸入關鍵詞，就能返回你想要的內(nèi)容，有小程序、在線網(wǎng)頁版、PC客戶端和批量生成器

官網(wǎng)：https://ai.de1919.com。

本文目錄:

求一款軟件用于列舉數(shù)字的排列組合，最好能像excel表格那種格式顯示出來
什么軟件可以自動排列組合abc
四位數(shù)的排列組合軟件有哪些

數(shù)字排列組合軟件app（數(shù)字排列組合軟件）

求一款軟件用于列舉數(shù)字的排列組合，最好能像excel表格那種格式顯示出來

給你一段VBA代碼吧，放入EXCEL的代碼頁中（ALT+F11），運行主程序MYCMB()就會把結果輸出到表格中。
Sub MYCMB()
Const t = 5, Z = 8 '從8個數(shù)字中取5個進行組合
Dim CNO, q(), CM(), CM2()
st = Timer
'為保證速度，用數(shù)組存儲結果
ReDim q(1 To t)
ReDim CM(1 To WorksheetFunction.combin(Z, t))
nq 1, 1, t, Z, CNO, q(), CM()
'轉二維數(shù)組，以便EXCEL存放
ReDim CM2(1 To CNO, 1 To t)
For i = 1 To CNO
For j = 1 To t
CM2(i, j) = CM(i)(j)
Next j
Next i
'輸出結果到表格
Cells(1, t + 2) = "組合數(shù)"
Cells(1, t + 3) = CNO
If CNO > 65536 Then CNO = 65536
Range(Cells(1, 1), Cells(CNO, t)) = CM2
Cells(2, t + 2) = "運行時間(秒)"
Cells(2, t + 3) = Timer - st
End Sub
'遞歸函數(shù)
Sub nq(n, s, x, E, CNO, q(), CM())
For i = s To E - x + n
q(n) = i
If n = x Then '當前組合的數(shù)字已經(jīng)選完
CNO = CNO + 1
CM(CNO) = q
Else
nq n + 1, i + 1, x, E, CNO, q(), CM()
End If
Next i
End Sub追問

雖然懂程序，但沒用過這個，請具體指點怎么操作，我要把16個數(shù)字按5位組合，不連續(xù)的16個數(shù)，謝謝

追答

16個數(shù)字？是包括兩位數(shù)十進制數(shù)字，還是十六個十六進制數(shù)字？是16個數(shù)字選5個進行組合嗎？那就不一定是5位數(shù)了？能否說明白一點，最好有舉例說明你的要求。

追問

都是十進制數(shù)字比如：1；3；4；5；9；10；11；13；17；19；25；28；29；32；34；39；組合1 3 4 5 9,1 3 4 5 10,1 3 4 5 11,1 3 4 5 13......依次排列下去，會有4368種組合，在excel表中一一列舉出來

追答

直接把第一行的參數(shù)改一下就可以實際1到16這十六個數(shù)字選5，Const t = 5, Z = 16
但如果要指定數(shù)字或其它字符串名稱，則需要增加一個存放這此字符串名稱的數(shù)組。如下：
Sub MYCMB()
Dim Z, t '從Z個元素中取出t個進行組合
Dim CNO, q(), CM(), CM2(), ID
st = Timer
'設置元素名稱，及要取出元素的個數(shù)
ID = Array("1", "3", "4", "5", "9", "10", "11", "13", "17", "19", "25", "28", "29", "32", "34", "39")
Z = UBound(ID) + 1 '總的元素個數(shù)
t = 5 '要取的元素個數(shù)
'為保證速度，用數(shù)組存儲結果
ReDim q(1 To t)
ReDim CM(1 To WorksheetFunction.combin(Z, t))
nq 1, 1, t, Z, CNO, q(), CM(), ID
'轉二維數(shù)組，以便EXCEL存放
ReDim CM2(1 To CNO, 1 To t)
For i = 1 To CNO
For j = 1 To t
CM2(i, j) = CM(i)(j)
Next j
Next i
'輸出結果到表格
Cells(1, t + 2) = "組合數(shù)"
Cells(1, t + 3) = CNO
If CNO > 65536 Then CNO = 65536
Range(Cells(1, 1), Cells(CNO, t)) = CM2
Cells(2, t + 2) = "運行時間(秒)"
Cells(2, t + 3) = Timer - st
End Sub
'遞歸函數(shù)
'n,s:當前組合中位置、當前要選的數(shù)的開始
'e和x：從e個數(shù)里取x個進行組合
'CNO：組合數(shù)
'CM()：組合結果
Sub nq(n, s, x, E, CNO, q(), CM(), ID)
For i = s To E - x + n
q(n) = ID(i - 1)
If n = x Then '當前組合的數(shù)字已經(jīng)選完
CNO = CNO + 1
'ReDim Preserve CM(1 To CNO)
CM(CNO) = q
Else
nq n + 1, i + 1, x, E, CNO, q(), CM(), ID
End If
Next i
End Sub

追問

哈哈哈，剛才沒刷新網(wǎng)頁，要的就是這個，非常感謝.....100分你的了

追答

做了個完整的帶界面的，排列和組合都可以做。見附件！

數(shù)字排列組合軟件app（數(shù)字排列組合軟件）

什么軟件可以自動排列組合abc

有很多軟件可以用于自動排列組合abc。你可以嘗試使用Excel，它可以幫助你快速排列組合abc。同時，還有一些其他的軟件可以用于復雜的排列組合，比如Permutations Generator或QROSS等。不過，如果你只想簡單的排列組合abc，使用Excel就可以了。

四位數(shù)的排列組合軟件有哪些

《數(shù)學思維》、排列組合計算器。
1、《數(shù)學思維》的功能非常的強大，各個不同學習階段都能夠利用它來幫助大家去進行公式的求解，同時還提供了各種公式的合集，自動去繪制圖形等，是能夠排列四位數(shù)組合的軟件。
2、排列組合計算器是一款簡單實用的數(shù)學公式計算器，軟件方便簡單，只要用戶錄入四位數(shù)的數(shù)值，它就能夠幫助用戶快速計算出所有結果。

以上就是關于數(shù)字排列組合軟件app相關問題的回答。希望能幫到你，如有更多相關問題，您也可以聯(lián)系我們的客服進行咨詢，客服也會為您講解更多精彩的知識和內(nèi)容。