取出各个值,放进数组里,sort一下,然后去掉前三后三。
dim ary() as double = {9,5,8,7,1,4,3,2,6}array.sort(ary)dim sum as double = 0For i As Integer = 3 To ary.length - 4 sum += ary(i) msgbox(ary(i))Nextmsgbox(sum / (ary.length - 6))
加入数组或集合
排序
取中间10个计算