随机排列一组数

王骏奇

例如现在有1，2，3三个数，如何将这三个数随机排序，例如2，3，1        3，2，1  诸如此类？

难解

  

子程序名	返回值类型	公开	备 注
随机打乱数组

变量名	类 型	静态	数组	备 注
欲打乱的文本数组	文本型		0
随机数	整数型
i	整数型

欲打乱的文本数组 ＝ { “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “10” }
置随机数种子 ()
计次循环首 (取数组成员数 (欲打乱的文本数组), i)
随机数 ＝ 取随机数 (1, 取数组成员数 (欲打乱的文本数组))
交换变量 (欲打乱的文本数组 [i], 欲打乱的文本数组 [随机数])
计次循环尾 ()
调试输出 (欲打乱的文本数组)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 随机打乱数组<br /> .局部变量 欲打乱的文本数组, 文本型, , "0"<br /> .局部变量 随机数, 整数型<br /> .局部变量 i, 整数型<br /> <br /> 欲打乱的文本数组 ＝ { “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “10” }<br /> 置随机数种子 ()<br /> .计次循环首 (取数组成员数 (欲打乱的文本数组), i)<br />     随机数 ＝ 取随机数 (1, 取数组成员数 (欲打乱的文本数组))<br />     交换变量 (欲打乱的文本数组 <i>, 欲打乱的文本数组 [随机数])<br /> .计次循环尾 ()<br /> 调试输出 (欲打乱的文本数组)

Suky

取随机数，然后根据随机数给成员交换变量

数组随机排序、数组乱序
https://bbs.125.la/forum.php?mod=viewthread&tid=14712180
(出处: 精易论坛)


补充内容 (2022-9-22 00:14):
最简单有效快速的-数组乱序
https://bbs.125.la/forum.php?mod=viewthread&tid=14746252
(出处: 精易论坛)

smpsoft

  

子程序名	返回值类型	公开	备 注
随机打乱数组

变量名	类 型	静态	数组	备 注
欲打乱的文本数组	文本型		0
暂存变量	文本型
打乱后的文本数组	文本型		0
随机数	整数型

欲打乱的文本数组 ＝ { “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “10” }
置随机数种子 ()
计次循环首 (取数组成员数 (欲打乱的文本数组), )
随机数 ＝ 取随机数 (1, 取数组成员数 (欲打乱的文本数组))
暂存变量 ＝ 暂存变量 ＋ 欲打乱的文本数组 [随机数] ＋ “|”
删除成员 (欲打乱的文本数组, 随机数, )
打乱后的文本数组 ＝ 分割文本 (暂存变量, “|”, )
计次循环尾 ()
调试输出 (打乱后的文本数组)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 随机打乱数组<br /> .局部变量 欲打乱的文本数组, 文本型, , "0"<br /> .局部变量 暂存变量, 文本型<br /> .局部变量 打乱后的文本数组, 文本型, , "0"<br /> .局部变量 随机数, 整数型<br /> <br /> <br /> 欲打乱的文本数组 ＝ { “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9”, “10” }<br /> 置随机数种子 ()<br /> .计次循环首 (取数组成员数 (欲打乱的文本数组), )<br />     随机数 ＝ 取随机数 (1, 取数组成员数 (欲打乱的文本数组))<br />     暂存变量 ＝ 暂存变量 ＋ 欲打乱的文本数组 [随机数] ＋ “|”<br />     删除成员 (欲打乱的文本数组, 随机数, )<br />     打乱后的文本数组 ＝ 分割文本 (暂存变量, “|”, )<br /> <br /> .计次循环尾 ()<br /> 调试输出 (打乱后的文本数组)

鹏书

取随机数啊

smpsoft

@Suky 没有多出一个空文本的数组成员* 数组:10{“5”,“7”,“8”,“9”,“3”,“2”,“1”,“10”,“6”,“4”}

Suky

smpsoft 发表于 2022-9-22 07:42
@Suky 没有多出一个空文本的数组成员* 数组:10{“5”,“7”,“8”,“9”,“3”,“2”,“1”,“10”,“6”, ...

不应该啊，我按流程模拟，最后一个成员文本之后会带着一个分隔符
按分隔符分割文本的话    不是应该在最后面出现一个空文本成员吗？
还是说放在有效成员前后端的不受影响？或者放后端的不受影响？？
我先去测试一下

Suky

smpsoft 发表于 2022-9-22 07:42
@Suky 没有多出一个空文本的数组成员* 数组:10{“5”,“7”,“8”,“9”,“3”,“2”,“1”,“10”,“6”, ...

好像是个没正式说明的处理效果？

zhtcCC

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量 数组, 整数型, , "0"
.局部变量 i, 整数型
.局部变量 j, 整数型

数组 ＝ { 1, 2, 3, 4, 5 }
置随机数种子 ()

.变量循环首 (取数组成员数 (数组), 2, -1, i)
    交换变量 (数组 [取随机数 (1, i － 1)], 数组 [i])
.变量循环尾 ()
.计次循环首 (取数组成员数 (数组), j)
    输出调试文本 (数组 [j])
.计次循环尾 ()