编写一个网页,从键盘上输入10个数,然后输出这10个数中的最小值及其位置

要用VBSCRIPT来写,过程要详细,谢谢啦~十万火急啊

用数组A[10]将这10个数存储，MIN（A[i]，A[i+1]），MAX（A[i]，A[i+1]）通过循环将数据确定下来，找到i，并将i的位置记录到一变量ADD，输出即可！

private sub command1_click()    dim a(1 to 10) as double    dim ave as double, max as double, min as double, sum as double    for i = 1 to 10       a(i) = val(inputbox("请输入第" & i & "个数"))       sum = sum + a(i)       print a(i);    next i    print    max = a(1): min = a(1)    for i = 2 to 10       if max < a(i) then max = a(i)       if min > a(i) then min = a(i)    next i    ave = sum / 10    print "最大值为："; max    print "最小值为："; min    print "平均值为："; ave end sub