来一个很奇葩的 猴子排序 源代码

APPLEUFO

猴子排序  百d搜索一下看看  

速度很慢的，随机排序     仅供参考用

  

子程序名	返回值类型	公开	备 注
子程序_猴子排序			从小到大
参数名	类 型	参考	可空	数组	备 注
参数_数组	整数型

变量名	类 型	静态	数组	备 注
n1	整数型
局变_随机数	整数型
局变_结果正确	逻辑型
局变_次数	整数型			这个是洗牌次数记录

置随机数种子 ()
循环判断首 ()
局变_次数 ＝ 局变_次数 ＋ 1
计次循环首 (取数组成员数 (参数_数组), n1)
局变_随机数 ＝ 取随机数 (n1, 取数组成员数 (参数_数组))
交换变量 (参数_数组 [n1], 参数_数组 [局变_随机数])
计次循环尾 ()
计次循环首 (取数组成员数 (参数_数组) － 1, n1)
如果 (参数_数组 [n1] ≤ 参数_数组 [n1 ＋ 1])
' 结果正常
局变_结果正确 ＝ 真


' 结果异常
局变_结果正确 ＝ 假
跳出循环 ()

计次循环尾 ()
如果 (局变_结果正确 ＝ 真)
跳出循环 ()  ' 结果OK


' 否则，继续洗牌再试一次

循环判断尾 (真)
调试输出 (局变_次数, “试验多少次得出结果”)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序_猴子排序, , , 从小到大<br /> .参数 参数_数组, 整数型, 数组<br /> .局部变量 n1, 整数型<br /> .局部变量 局变_随机数, 整数型<br /> .局部变量 局变_结果正确, 逻辑型<br /> .局部变量 局变_次数, 整数型, , , 这个是洗牌次数记录<br /> <br /> <br /> 置随机数种子 ()<br /> <br /> .循环判断首 ()<br />     局变_次数 ＝ 局变_次数 ＋ 1<br /> <br />     .计次循环首 (取数组成员数 (参数_数组), n1)<br />         局变_随机数 ＝ 取随机数 (n1, 取数组成员数 (参数_数组))<br />         交换变量 (参数_数组 [n1], 参数_数组 [局变_随机数])<br />     .计次循环尾 ()<br /> <br />     .计次循环首 (取数组成员数 (参数_数组) － 1, n1)<br /> <br />         .如果 (参数_数组 [n1] ≤ 参数_数组 [n1 ＋ 1])<br />             ' 结果正常<br />             局变_结果正确 ＝ 真<br />         .否则<br /> <br />             ' 结果异常<br />             局变_结果正确 ＝ 假<br />             跳出循环 ()<br />         .如果结束<br /> <br />     .计次循环尾 ()<br /> <br />     .如果 (局变_结果正确 ＝ 真)<br />         跳出循环 ()  ' 结果OK<br />     .否则<br /> <br />         ' 否则，继续洗牌再试一次<br />     .如果结束<br /> <br /> .循环判断尾 (真)<br /> <br /> 调试输出 (局变_次数, “试验多少次得出结果”)

网络注册会员

感谢分享

清风徐来2

感谢分享

清风徐来2

感谢分享

hdf2015

看不懂但是看起来很厉害的样子

强悍啊

感谢楼主分享

lchhome

强烈支持楼主！！！！！！！！！！！！

ghost12

感谢发布原创作品，精易因你更精彩！

趣冉科技

感谢楼主分享，支持一下~~

leiwawa001

谢谢分享。