精易论坛

标题: 取不重复随机数 [打印本页]

作者: zl99585834    时间: 2024-7-6 21:28
标题: 取不重复随机数
  
子程序名返回值类型公开备 注
取不重复随机数  
参数名类 型参考可空数组备 注
要取出的个数整数型要取出几个
最小值整数型为空则默认0
最大值整数型为空则默认999999
存放数组整数型
变量名类 型静态数组备 注
原始个数整数型 
初始数组整数型0
i整数型 
j整数型 
临时取出整数型 
k整数型 
已取出整数型 
开始时间长整数型 
如果真 (要取出的个数 < 1)
要取出的个数 = 1
如果真 (是否为空 (最小值))
最小值 = 0
如果真 (是否为空 (最大值))
最大值 = 999999
如果真 (最小值 > 最大值)
返回 ()
开始时间 = 到长整数 (时间_取现行时间戳 ())
已取出 = 0
置随机数种子 ()
清除数组 (初始数组)
清除数组 (存放数组)
原始个数 = 最大值 - 最小值 + 1
计次循环首 (原始个数, i)
加入成员 (初始数组, 最小值 + i - 1)
处理事件 ()
计次循环尾 ()
计次循环首 (要取出的个数, j)
临时取出 = 初始数组 [汇编_取随机数 (1, 取数组成员数 (初始数组))]
加入成员 (存放数组, 临时取出)
已取出 = 已取出 + 1
如果真 (已取出 ≥ 要取出的个数)
' 要取的个数比初始数组里的个数多
跳出循环 ()
计次循环首 (取数组成员数 (初始数组), k)
如果真 (初始数组 [k] = 临时取出)
删除成员 (初始数组, k, )
跳出循环 ()
处理事件 ()
计次循环尾 ()
调试输出 (临时取出)
计次循环尾 ()
调试输出 (“取出个数:”到文本 (已取出)“,耗时:”到文本 (到长整数 (时间_取现行时间戳 ()) - 开始时间)“ms”)
调试输出 (存放数组)


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


速度比较慢,但是绝对是不重复的,调用了精易模块

作者: 笨来无一悟    时间: 2024-7-6 21:54
功德无量
作者: shuya1    时间: 2024-7-7 02:27
支持开源~!感谢分享
作者: ganqing1234560    时间: 2024-7-7 04:04
6666666666666666666666666666666666666666666666666
作者: ZHuanR    时间: 2024-7-7 07:14
新技能已get√
作者: 查过    时间: 2024-7-7 07:16
感谢发布原创作品,精易因你更精彩!6666666666666
作者: 豆豆灰常开心    时间: 2024-7-7 07:21
下个学习一下
作者: 一指温柔    时间: 2024-7-7 08:50
感谢分享
作者: baitso    时间: 2024-7-7 09:30
感谢分享
作者: bianyuan456    时间: 2024-7-7 19:37
已经顶贴,感谢您对论坛的支持!
作者: 查过    时间: 2024-7-8 07:28
下个学习一下
作者: 豆豆灰常开心    时间: 2024-7-8 07:32
感谢楼主分享!
作者: 396384183    时间: 2024-7-8 09:05
学习学习
作者: please    时间: 2024-7-8 09:36
感谢分享,支持开源!!!
作者: lmluo    时间: 2024-7-8 12:02
学习一下,感谢分享,支持
作者: 光影魔术    时间: 2024-7-9 10:05
感谢分享源码
作者: wh1234567    时间: 2024-7-9 10:32
感谢分享,路过看看
作者: pq9999    时间: 2024-7-10 21:53
好像很不错的样子
作者: hjinpwhe1    时间: 2024-7-13 07:47
学习  学习
作者: 大刀刃    时间: 2024-7-17 07:08
学习学习1
作者: 1150129654    时间: 2024-7-22 22:11
66666666666666666666666666
作者: 熊不熊    时间: 2024-12-5 01:24
感谢分享,很给力!~
作者: 迣渁de兲涳    时间: 2025-2-26 10:58
感谢分享




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4