易语言取指定数组

.版本 2.子程序 _按钮1_被单击

.局部变量碧纯 数, 整数型, , "0"

.局部变量 i, 整数型

.局部变量 j, 整数型

.局部变量 k, 整数型重定义数组 (数, 假, 0)

列表框1.清悔差咐空 ()

i = 0

.判断循环首 (取数组成员数 (数) ＜ 50)

加入成员 (数, 取随庆答机数 (1, 100))

i = i ＋ 1

.如果真 (i ＞ 1)

k = 取数组成员数 (数) － 1

.计次循环首 (k, j)

.如果真 (数 [k ＋ 1] = 数 [j])

删除成员 (数, k ＋ 1, )

跳出循环 ()

.如果真结束.计次循环尾 ()

.如果真结束.判断循环尾 ()

.计次循环首 (取数组成员数 (数), i)

列表框1.加入项目 (到文本 (数 [i]), )

.计次循环尾 ()

随机提取数组的成员步骤是：

A变量 = 取数组成员数（你的数组名称）。'先取出下标，A变量设置为数值型。

置随机数种子（）。 '实现完全随机

B变量=取随机数（1，A变量）局改'随机抽取从数组中抽取出一个成员，B变量设桐备判置为数值型。

C变量=你的数组名称[B变量]