取随机不重复整数

阿元

原来我学过一个，逻辑性太强，效率不好啊，我想到了这个。

ngs865

我好像什么都不会～～～

曾经的那段青春

好东西必须要支持

无敌小白

  

子程序名	返回值类型	公开	备 注
文本__取不重复随机数2	文本型		节点方式，返回文本，中间空格隔开
参数名	类 型	参考	可空	数组	备 注
最小	整数型				随机数的最小值
最大	整数型				随机数的最大值
个数	整数型				要取出的个数
是否排序	逻辑型				默认为假。

变量名	类 型	静态	数组	备 注
随机数组	文本型		0
随机数组2	整数型		0
随机	整数型
a	文本型
节点	节点
i	整数型
str	文本型

判断 (最小 ＜ 最大 且 最大 － 最小 ≥ 个数)
置随机数种子 ()
判断循环首 (取数组成员数 (随机数组) ＜ 个数)
a ＝ 到文本 (取随机数 (最小, 最大))
节点.加入属性 (a, “”)
节点.取全部属性名 (随机数组)
判断循环尾 ()
计次循环首 (取数组成员数 (随机数组), i)
加入成员 (随机数组2, 到整数 (随机数组 [i]))
计次循环尾 ()
如果真 (是否排序 ＝ 真)
数组排序 (随机数组2, 真)

计次循环首 (取数组成员数 (随机数组2), i)
str ＝ str ＋ 到文本 (随机数组2 [i]) ＋ “ ”
计次循环尾 ()
返回 (取文本左边 (str, 取文本长度 (str) － 1))
返回 (“”)

i支持库列表	支持库注释
EDataStructure	数据结构支持库

.版本 2<br /> .支持库 EDataStructure<br /> <br /> .子程序 文本__取不重复随机数2, 文本型, 公开,   节点方式，返回文本，中间空格隔开<br /> .参数 最小, 整数型, , 随机数的最小值<br /> .参数 最大, 整数型, , 随机数的最大值<br /> .参数 个数, 整数型, , 要取出的个数<br /> .参数 是否排序, 逻辑型, 可空, 默认为假。<br /> .局部变量 随机数组, 文本型, , "0"<br /> .局部变量 随机数组2, 整数型, , "0"<br /> .局部变量 随机, 整数型<br /> .局部变量 a, 文本型<br /> .局部变量 节点, 节点<br /> .局部变量 i, 整数型<br /> .局部变量 str, 文本型<br /> <br /> <br /> .判断开始 (最小 ＜ 最大 且 最大 － 最小 ≥ 个数)<br />     置随机数种子 ()<br />     .判断循环首 (取数组成员数 (随机数组) ＜ 个数)<br />         a ＝ 到文本 (取随机数 (最小, 最大))<br />         节点.加入属性 (a, “”)<br />         节点.取全部属性名 (随机数组)<br />     .判断循环尾 ()<br />     .计次循环首 (取数组成员数 (随机数组), i)<br />         加入成员 (随机数组2, 到整数 (随机数组 <i>))<br />     .计次循环尾 ()<br />     .如果真 (是否排序 ＝ 真)<br />         数组排序 (随机数组2, 真)<br />     .如果真结束<br /> <br />     .计次循环首 (取数组成员数 (随机数组2), i)<br />         str ＝ str ＋ 到文本 (随机数组2 <i>) ＋ “ ”<br />     .计次循环尾 ()<br />     返回 (取文本左边 (str, 取文本长度 (str) － 1))<br /> .默认<br />     返回 (“”)

  

子程序名	返回值类型	公开	备 注
文本__取不重复随机数1	文本型		自然算法，返回文本，中间空格隔开
参数名	类 型	参考	可空	数组	备 注
最小	整数型				取随机数的最小值
最大	整数型				取随机数的最大值
个数	整数型				要取出的个数
是否排序	逻辑型				默认为假

变量名	类 型	静态	数组	备 注
随机数组	整数型		0
随机1	整数型
i	整数型
数量	整数型
判断重复	逻辑型
str	文本型

判断 (最小 ＜ 最大 且 最大 － 最小 ≥ 个数)
判断循环首 (取数组成员数 (随机数组) ＜ 个数)
置随机数种子 ()
随机1 ＝ 取随机数 (最小, 最大)
数量 ＝ 取数组成员数 (随机数组)
如果真 (数量 ≠ 0)
计次循环首 (数量, i)
如果真 (随机1 ＝ 随机数组 [i])
判断重复 ＝ 真
跳出循环 ()

计次循环尾 ()
如果真 (判断重复 ＝ 假)
加入成员 (随机数组, 随机1)
判断重复 ＝ 假
判断循环尾 ()
如果真 (是否排序 ＝ 真)
数组排序 (随机数组, 真)

计次循环首 (取数组成员数 (随机数组), i)
str ＝ str ＋ 到文本 (随机数组 [i]) ＋ “ ”
计次循环尾 ()
返回 (取文本左边 (str, 取文本长度 (str) － 1))
返回 (“”)

.版本 2<br /> <br /> .子程序 文本__取不重复随机数1, 文本型, 公开, 自然算法，返回文本，中间空格隔开<br /> .参数 最小, 整数型, , 取随机数的最小值<br /> .参数 最大, 整数型, , 取随机数的最大值<br /> .参数 个数, 整数型, , 要取出的个数<br /> .参数 是否排序, 逻辑型, 可空, 默认为假<br /> .局部变量 随机数组, 整数型, , "0"<br /> .局部变量 随机1, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 数量, 整数型<br /> .局部变量 判断重复, 逻辑型<br /> .局部变量 str, 文本型<br /> <br /> .判断开始 (最小 ＜ 最大 且 最大 － 最小 ≥ 个数)<br />     .判断循环首 (取数组成员数 (随机数组) ＜ 个数) <br />         置随机数种子 ()<br />         随机1 ＝ 取随机数 (最小, 最大)<br />         数量 ＝ 取数组成员数 (随机数组) <br />         .如果真 (数量 ≠ 0)<br />             .计次循环首 (数量, i)<br />                 .如果真 (随机1 ＝ 随机数组 <i>)<br />                     判断重复 ＝ 真<br />                     跳出循环 ()<br />                 .如果真结束<br /> <br />             .计次循环尾 ()<br />         .如果真结束<br />         .如果真 (判断重复 ＝ 假)<br />             加入成员 (随机数组, 随机1)<br />         .如果真结束<br />         判断重复 ＝ 假 <br />     .判断循环尾 ()<br />     .如果真 (是否排序 ＝ 真)<br />         数组排序 (随机数组, 真)<br />     .如果真结束<br /> <br />     .计次循环首 (取数组成员数 (随机数组), i)<br />         str ＝ str ＋ 到文本 (随机数组 <i>) ＋ “ ”<br />     .计次循环尾 ()<br />     返回 (取文本左边 (str, 取文本长度 (str) － 1))<br /> .默认<br />     返回 (“”)

obit125

好东西必须要支持

wuqilei

蛮好的啊，，，，。

阿元

千狐 发表于 2018-3-23 11:58
为啥我看不懂呢

那说明你的基础还不好

千狐

为啥我看不懂呢

张浚哲

来学习了！

阿元

志爱你 发表于 2018-3-20 18:36
这个还可以啊，试试看

我发错地方了，这是我写的

志爱你

这个还可以啊，试试看