易语言取随机数5-7位不重复并且排序的方法
易语言取随机数5-7位不重复并且排序的方法
.版本 2
.支持库 spec
.局部变量 a
.局部变量 b
.局部变量 c, 整数型
.局部变量 文本, 文本型
.局部变量 temp, 文本型, , “0”
置随机数种子 (987654321)
a ＝ 9999
b ＝ 9999999
.计次循环首 (100, )
c ＝ 取随机数 (a, b)
.如果真 (寻找文本 (文本, 到文本 (c), , 假) ＝ -1)
文本 ＝ 文本 ＋ 到文本 (c) ＋ “|”
.如果真结束
.计次循环尾 ()
temp ＝ 分割文本 (文本, “|”, )
数组排序 (temp, )
调试输出 (temp)
———————–
正在编译现行程序
正在检查重复名称…
正在预处理现行程序
正在进行名称连接…
正在统计需要编译的子程序
正在编译…
正在生成主程序入口代码
程序代码编译成功
正在封装易格式目的代码
开始运行被调试程序
- 数组:100{“17532”,“39116”,“32214”,“26361”,“26681”,“24113”,“16401”,“31812”,“23202”,“40278”,“14273”,“36128”,“31379”,“38715”,“18735”,“14010”,“21071”,“18336”,“29038”,“28914”,“27917”,“29816”,“26614”,“14698”,“42419”,“20891”,“33679”,“29917”,“21217”,“36027”,“26225”,“31411”,“29745”,“21913”,“13737”,“32466”,“17597”,“13944”,“24510”,“19894”,“22242”,“20690”,“13973”,“36548”,“40260”,“21067”,“24722”,“32987”,“34066”,“13795”,“25856”,“25901”,“34188”,“42351”,“22451”,“35917”,“18626”,“36682”,“26603”,“14728”,“20894”,“17480”,“22140”,“20601”,“17188”,“12779”,“38700”,“32984”,“11513”,“36058”,“41309”,“25747”,“33058”,“32654”,“13292”,“17440”,“38671”,“12623”,“36952”,“29969”,“24536”,“14687”,“28967”,“34537”,“12230”,“21109”,“16261”,“12846”,“16661”,“25196”,“19503”,“15807”,“21496”,“10813”,“36751”,“20072”,“36830”,“12843”,“13608”,“21684”}
被调试易程序运行完毕
~~ The End ~~
最后编辑：2022 年 04 月 29 日 15:14
本文链接：https://blog.zlrm.net/index.php/22.html（转载时请注明出处及链接! ）
作品采用： 署名-非商业性使用-相同方式共享 4.0 国际 (CC BY-NC-SA 4.0) 许可协议授权。