找回密码
 加入
搜索
查看: 1321|回复: 3

请教高手一个随机产生顺序该怎么写

[复制链接]
发表于 2009-4-11 16:36:26 | 显示全部楼层 |阅读模式
遇到一个问题,我现在有5个数字,顺序排列,,比如说1,2,3,4,5, 我想随机的产生一个顺序,比如说,,5,3,2,4,1,或者2,3,1,4,5 这个顺序是用程序随机产生的.这样的程序该怎么写? 求高手指点,谢谢!!!!!

[ 本帖最后由 jieelin 于 2009-4-11 21:50 编辑 ]
发表于 2009-4-11 17:06:19 | 显示全部楼层
用字符控制加Random
发表于 2009-4-11 17:31:24 | 显示全部楼层
就是随机数不重复咯 论坛有例子 搜索
 楼主| 发表于 2009-4-11 21:50:09 | 显示全部楼层
在论坛里搜索了一下并稍微修改了一下,改成自己想要的.. 代码如下:
#include "array.au3"

$n = 5  ;要取的总个数
$Bx = ""  ;显示用
Dim $A[5]   ;存放5个数
For $i = 0 To 4   ;放数进去
        $A[$i] = $i + 1
Next
For $i = 1 To $n
        $y = Random(1, UBound($A)-1, 1)
        $Bx &=$A[$y]
        _ArrayDelete($A, $y)
Next
MsgBox(0, "", $Bx)
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2025-1-12 23:14 , Processed in 0.088671 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表