运行下列过程,当输入一组数据:10,20,50,80,40,30,90,100,60.70,输出的结果应该是 sub pl( ) Dim i, j, arr(11)As Integer k=1 While k<=10 arr(k)=Val(InputBox('请输入第' & k & '个数:', '输入窗口' )) k=k+1 Wend For i=1 T0 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 A)升序数列 B)降序数列 C)无序数列 D)原输入数列