运行下列过程,当输入一组数据: 10, 20, 50, 80, 40, 30, 90, 100, 60, 70 ,输出的结果应该是( ) Sub p1( ) Dim I, j, arr(11) As Integer k = 1 While k <= 10 arr(k)=val(inputbox(" 请输入第 "&k&" 个数 :"," 输入窗口 ")) k = k + 1 Wend For I = 1 To 9 j = I + 1 If arr(i) > arr(j) Then temp = arr(i) arr(i) = arr(j) arr(j) = temp End If Debug.Print arr(i) Next I End Sub