当前位置: 答题翼 > 问答 > 计算机类考试 > 正文
目录: 标题| 题干| 答案| 搜索| 相关
问题

运行下列过程,当输入一组数据:10,20,50,80,40,30,90,100,60.70,输出的结果应该是 sub pl() Dim


运行下列过程,当输入一组数据: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)原输入数列

参考答案
您可能感兴趣的试题
  • 对一组数据进行分组,各组的组限依次是“10~20”、“20~30”、“30~40”、“40~50”、“50~60”、“60~70”。在以上

  • CTCS-3级列控车载设备()可以在停车或运行过程中输入/修改,其它列车数据只有在列车停车时才能输入

  • 对一组数据进行分组 各组的组限依次是“10~20” “20~30” “30~40” “40~50”

  • 对一组数据进行分组 各组的组限依次为“10-20”“20-30”“30-40”“40-50”“50

  • 对一组数据进行分组 各组的组限依次为“10~20” “20~30” “30~40” “40~50

  • 对一组数据进行分组 各组的组限依次是“10~20” “20~30” “30~40” “40~50” “50~60” “60~70”