求出数组中3个最大值，如何判断他们在数组中的位置？

q960126

求出数组中3个最大值，如何判断他们在数组中的位置？，我想表达为位置减1

MY寂寞的夜

[e]
.版本 2
.支持库 spec

.程序集 窗口程序集1

.子程序 _按钮1_被单击
.局部变量 数组, 文本型, , "0"
.局部变量 计次, 整数型
.局部变量 计次1, 整数型
.局部变量 小于次数, 整数型
.局部变量 数组位置, , , "0"

文本_取中间_批量 (编辑框1.内容, #前面, #后面, 数组)
调试输出 (数组)
.计次循环首 (取数组成员数 (数组), 计次)
    .计次循环首 (取数组成员数 (数组), 计次1)
        .如果 (到整数 (数组 [计次]) ＜ 到整数 (数组 [计次1]))


            小于次数 ＝ 小于次数 ＋ 1
        .否则

        .如果结束
        ' 调试输出 (数组位置)
    .计次循环尾 ()


    .如果 (小于次数 ＜ 3)
        加入成员 (数组位置, 计次)  ' 在这里 加个 这就行了
        调试输出 (数组 [计次])  ' 取出的就是最大的三个

    .否则

    .如果结束
    小于次数 ＝ 0
.计次循环尾 ()
调试输出 (数组位置)
[/e]

漩涡

求出来比较大小

MY寂寞的夜

别忘记给个最佳