用到了数组,可以优化……
.局部变量 数组, , , "0".局部变量 I重定义数组 (数组, 假, 100).计次循环首 (取数组成员数 (数组), I) 数组 [I] = I.计次循环尾 ()置随机数种子 ().计次循环首 (10, ) ' 写取出的数的多少,我取10次 I = 取随机数 (1, 取数组成员数 (数组)) ' 最小值不能小于1 调试输出 (数组 [I]) ' 取出的随机数 删除成员 (数组, I, ).计次循环尾 ()