.版本 2
.子程序 _按钮1_被单击
.局部变量 Z, 整数型, , "0"
.局部变量 I, 整数型
刷新数值 (Z)
编辑框1.内容 ＝ “”
.计次循环首 (取数组成员数 (Z), I)
编辑框1.内容 ＝ 编辑框1.内容 ＋ 到文本 (Z [I]) ＋ #换行符
.计次循环尾 ()
.子程序 刷新数值
.参数 返回值, 整数型, 数组
.局部变量 X, 整数型
.局部变量 Y, 整数型
清除数组 (返回值)
.判断循环首 (取数组成员数 (返回值) ≠ 10)
X ＝ 取随机数 (0, 27)
.计次循环首 (取数组成员数 (返回值), Y)
.如果真 (返回值 [Y] ＝ X)
X ＝ -1
.如果真结束
.计次循环尾 ()
.如果真 (X ≠ -1)
加入成员 (返回值, X)
.如果真结束
.判断循环尾 ()
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024