运行下列过程，当输入一组数据：10，20，50，80，40，30，90，100，60，70，输出的结果应该是 Sub p10 Dim i,i,art(11)As Integer k=1 While karr(j)Then

admin2020-06-06 39

问题运行下列过程，当输入一组数据：10，20，50，80，40，30，90，100，60，70，输出的结果应该是
Sub p10
Dim i,i,art(11)As Integer
k=1
While k<=10
   arr(k)=Val(InputBox("请输入第"＆k＆"个数："，"输入窗口"))
   k=k+1
Wend
For i=l To 9
   j=i+1
   Ifarr(i)>arr(j)Then
      temp=arr(i)
      arr(i)=arr(j)
      arr0)=temp
   End If
   Debug．Print arr(i)
Next i
  End Sub

选项 A、无序数列
B、升序数列
C、降序数列
D、原输入数列

答案A

解析

转载请注明原文地址:https://kaotiyun.com/show/oi0p777K

本试题收录于：二级Access题库NCRE全国计算机二级分类