作业帮请问一个E语言做随机数不重复问题,我现在想做一个关于1~编辑框内容怎么多的随机数,然后随机数是不重复的每次按按钮之后显示1个随机数,例如我编辑框写了10,就会出1~10然后出10次之后就没
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/18 10:58:26
请问一个E语言做随机数不重复问题,我现在想做一个关于1~编辑框内容怎么多的随机数,然后随机数是不重复的每次按按钮之后显示1个随机数,例如我编辑框写了10,就会出1~10然后出10次之后就没
请问一个E语言做随机数不重复问题,我现在想做一个关于1~编辑框内容怎么多的随机数,然后随机数是不重复的
每次按按钮之后显示1个随机数,例如我编辑框写了10,就会出1~10然后出10次之后就没有啦~请问各位大神这个应该怎样弄呢?
请问一个E语言做随机数不重复问题,我现在想做一个关于1~编辑框内容怎么多的随机数,然后随机数是不重复的每次按按钮之后显示1个随机数,例如我编辑框写了10,就会出1~10然后出10次之后就没
.版本 2
.程序集 窗口程序集1
.程序集变量 已经开始, 逻辑型
.程序集变量 随机数组2, 整数型, , "0"
.程序集变量 临时文本, 文本型
.程序集变量 随机数组1, 整数型, , "0"
.子程序 __启动窗口_创建完毕
编辑框1.输入方式 ＝ 3 ' 整数文本输入
置随机数种子 ()
.子程序 _按钮1_被单击
.局部变量 x, 整数型
.判断开始 (编辑框1.内容 ＝ “”)
信息框 (“请先输入随机最大值”, 0, )
返回 ()
.判断 (到数值 (编辑框1.内容) ＜ 1)
信息框 (“随机最大值不能小于1”, 0, )
返回 ()
.判断 (已经开始 ＝ 真)
取不重复随机数 ()
.默认
.计次循环首 (到整数 (编辑框1.内容), x)
加入成员 (随机数组1, x)
.计次循环尾 ()
临时文本 ＝ “”
随机数组2 ＝ 随机数组1
取不重复随机数 ()
.判断结束
.子程序 取不重复随机数
.局部变量 x, 整数型
.如果真 (取数组成员数 (随机数组2) ＜ 1)
信息框 (“已出随机数：” ＋ 临时文本 ＋ #换行符 ＋ “随机数已取完,点击确定之后重新开始!”, 0, )
清除数组 (随机数组1)
已经开始 ＝ 假
返回 ()
.如果真结束
x ＝ 取随机数 (1, 取数组成员数 (随机数组2))
已经开始 ＝ 真
.判断开始 (临时文本 ≠ “”)
信息框 (“当前随机数：” ＋ 到文本 (随机数组2 [x]) ＋ #换行符 ＋ “已出随机数：” ＋ 临时文本, 0, “取随机数”)
.默认
信息框 (“当前随机数：” ＋ 到文本 (随机数组2 [x]), 0, “取不重复随机数”)
.判断结束
临时文本 ＝ 临时文本 ＋ “[” ＋ 到文本 (随机数组2 [x]) ＋ “]”
清除数组 (随机数组2)
.计次循环首 (到整数 (编辑框1.内容), x)
.如果真 (寻找文本 (临时文本, “[” ＋ 到文本 (随机数组1 [x]) ＋ “]”, , 假) ＜ 0)
加入成员 (随机数组2, x)
.如果真结束
.计次循环尾 ()