0-9数字组合

你送的花开了

数字0-9 组合成8位数有多少总不重复组合  开头可以为0  00000000-99999999

写了几种写法也没真正做到所有组合  尝试了论坛开源的m选n的方法也没法做到所有组合  

求助生成00000000-99999999 0-9所有不重复组合

时髦猪

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

启动线程 (&写数, , )

子程序名	返回值类型	公开	备 注
写数

变量名	类 型	静态	数组	备 注
备选数据	文本型		0
组合文本	文本型		0
组合数量	整数型
数组下标	整数型		0
临时文本	文本型
a	整数型
是否重复	逻辑型
遍历完成	逻辑型
b	整数型

备选数据 ＝ 分割文本 (“0,1,2,3,4,5,6,7,8,9”, , )
' 备选数据 ＝ 分割文本 (“0,1,a”, , )
组合数量 ＝ 8
重定义数组 (数组下标, 假, 组合数量)
计次循环首 (组合数量 － 1, a)
数组下标 [a] ＝ 1
计次循环尾 ()
判断循环首 (真)
数组下标 [组合数量] ＝ 数组下标 [组合数量] ＋ 1
变量循环首 (组合数量, 1, -1, a)
如果真 (数组下标 [a] ＞ 取数组成员数 (备选数据))
如果 (a ＝ 1)
遍历完成 ＝ 真
跳出循环 ()
数组下标 [a － 1] ＝ 数组下标 [a － 1] ＋ 1
数组下标 [a] ＝ 1


变量循环尾 ()
如果真 (遍历完成 ＝ 真)
跳出循环 ()
如果真 (是否重复 ＝ 真)
是否重复 ＝ 假
到循环尾 ()
临时文本 ＝ “”
计次循环首 (组合数量, a)
临时文本 ＝ 临时文本 ＋ 备选数据 [数组下标 [a]]
计次循环尾 ()
编辑框1.加入文本 (临时文本 ＋ #换行符 )  ' 如果备选数据多要显示出来很慢的
b ＝ b ＋ 1
判断循环尾 ()
信息框 (“共” ＋ 到文本 (b) ＋ “次”, 0, , )

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 启动线程 (&写数, , )<br /> <br /> <br /> .子程序 写数<br /> .局部变量 备选数据, 文本型, , "0"<br /> .局部变量 组合文本, 文本型, , "0"<br /> .局部变量 组合数量, 整数型<br /> .局部变量 数组下标, 整数型, , "0"<br /> .局部变量 临时文本, 文本型<br /> .局部变量 a, 整数型<br /> .局部变量 是否重复, 逻辑型<br /> .局部变量 遍历完成, 逻辑型<br /> .局部变量 b, 整数型<br /> <br /> 备选数据 ＝ 分割文本 (“0,1,2,3,4,5,6,7,8,9”, , )<br /> ' 备选数据 ＝ 分割文本 (“0,1,a”, , )<br /> 组合数量 ＝ 8<br /> 重定义数组 (数组下标, 假, 组合数量)<br /> .计次循环首 (组合数量 － 1, a)<br />     数组下标 [a] ＝ 1<br /> .计次循环尾 ()<br /> .判断循环首 (真)<br />     数组下标 [组合数量] ＝ 数组下标 [组合数量] ＋ 1<br />     .变量循环首 (组合数量, 1, -1, a)<br />         .如果真 (数组下标 [a] ＞ 取数组成员数 (备选数据))<br />             .如果 (a ＝ 1)<br />                 遍历完成 ＝ 真<br />                 跳出循环 ()<br />             .否则<br />                 数组下标 [a － 1] ＝ 数组下标 [a － 1] ＋ 1<br />                 数组下标 [a] ＝ 1<br />             .如果结束<br /> <br />         .如果真结束<br /> <br />     .变量循环尾 ()<br />     .如果真 (遍历完成 ＝ 真)<br />         跳出循环 ()<br />     .如果真结束<br />     .如果真 (是否重复 ＝ 真)<br />         是否重复 ＝ 假<br />         到循环尾 ()<br />     .如果真结束<br />     临时文本 ＝ “”<br />     .计次循环首 (组合数量, a)<br />         临时文本 ＝ 临时文本 ＋ 备选数据 [数组下标 [a]]<br />     .计次循环尾 ()<br />     编辑框1.加入文本 (临时文本 ＋ #换行符)  ' 如果备选数据多要显示出来很慢的<br />     b ＝ b ＋ 1<br /> .判断循环尾 ()<br /> 信息框 (“共” ＋ 到文本 (b) ＋ “次”, 0, , )

这个写完要好久，只计算都很长时间没计算出来
5位数很快

鹏书

多少组合那肯定是100000000 1亿组合

补充内容 (2023-7-14 15:30):
https://www.bilibili.com/video/BV1qA411S7Uj/

szweb01

所有不重复的8位数的个数是40320，这是因为从10个数字中选取8个数字的排列方式有10!/(10-8)! = 10987654*3种。import itertools

# 生成所有不重复的8位数
def generate_all_8_digits():
    # 创建一个空列表用于存储结果
    results = []
    # 获取0-9的所有排列组合
    permutations = itertools.permutations(range(10), 8)
    # 遍历每个排列
    for p in permutations:
        # 将数字转换为字符串
        p = [str(d) for d in p]
        # 用空字符连接字符串
        result = "".join(p)
        # 将结果添加到列表中
        results.append(result)
    # 返回结果列表
    return results

# 测试代码
results = generate_all_8_digits()
# 打印结果列表的长度，即所有不重复的8位数的个数
print(len(results))
# 打印结果列表中的前10个元素，作为示例
print(results[:10])

b0y

* “条数:” | 100000000.000000 | “占用字节:” | 1000000000.000000 | “占用硬盘约:” | “953 MB”

你送的花开了

szweb01 发表于 2023-7-14 15:32
所有不重复的8位数的个数是40320，这是因为从10个数字中选取8个数字的排列方式有10!/(10-8)! = 10987654*3 ...

写的很好  但是哥们只会e啊...

b0y

  

变量名	类 型	静态	数组	备 注
条数	双精度小数型
size	双精度小数型

g_Dict ＝ 分割文本 (“1,2,3,4,5,6,7,8,9,0”, “,”, )
条数 ＝ GetDictSize (g_Dict, 8, size)
调试输出 (“条数:”, 条数, “占用字节:”, size, “占用硬盘约:”, FileSizeFormatD (size))

子程序名	返回值类型	公开	备 注
GetDictSize	双精度小数型		返回条数.
参数名	类 型	参考	可空	数组	备 注
dict	文本型
len	整数型
dsize	双精度小数型				占用空间大小 每条已#换行符分割

变量名	类 型	静态	数组	备 注
numAry	整数型
lenAry	整数型
i	整数型
lenDict	双精度小数型

numAry ＝ 取数组成员数 (dict)
计次循环首 (numAry, i)
lenAry ＝ lenAry ＋ 取文本长度 (dict [i])
计次循环尾 ()
lenDict ＝ MathPow (numAry, len)
dsize ＝ lenAry ÷ numAry × len × lenDict ＋ lenDict × 2
返回 (lenDict)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 条数, 双精度小数型<br /> .局部变量 size, 双精度小数型<br /> <br /> g_Dict ＝ 分割文本 (“1,2,3,4,5,6,7,8,9,0”, “,”, )<br /> 条数 ＝ GetDictSize (g_Dict, 8, size)<br /> 调试输出 (“条数:”, 条数, “占用字节:”, size, “占用硬盘约:”, FileSizeFormatD (size))<br /> <br /> <br /> .子程序 GetDictSize, 双精度小数型, , 返回条数.<br /> .参数 dict, 文本型, 数组, <br /> .参数 len, 整数型<br /> .参数 dsize, 双精度小数型, 参考 可空, 占用空间大小 每条已#换行符分割<br /> .局部变量 numAry, 整数型<br /> .局部变量 lenAry, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 lenDict, 双精度小数型<br /> <br /> numAry ＝ 取数组成员数 (dict)<br /> .计次循环首 (numAry, i)<br />     lenAry ＝ lenAry ＋ 取文本长度 (dict <i>)<br /> .计次循环尾 ()<br /> lenDict ＝ MathPow (numAry, len)<br /> dsize ＝ lenAry ÷ numAry × len × lenDict ＋ lenDict × 2<br /> 返回 (lenDict)

前段时间写的字典生成器  扣出来的计算条数和占用硬盘大小

* “条数:” | 100000000.000000 | “占用字节:” | 1000000000.000000 | “占用硬盘约:” | “953 MB”

Suky

10的8次方个
你直接一个计次循环给它搞定好了
就是不知道会不会崩

补充内容 (2023-7-14 15:44):
另外，你说的不重复组合指的是哪部分不重复？

你送的花开了

Suky 发表于 2023-7-14 15:43
10的8次方个
你直接一个计次循环给它搞定好了
就是不知道会不会崩

计次循环遭不住   不出现相同的八位数

afu45

.版本 2 .支持库 spec  调试输出 (求次方 (10, 8))