[填空题] 下列程序的功能是:单击窗体时将随机生成10个0~99之间的随机数,并赋值给数组A,然后利用选择法排序;并把排序后的结果输出。 Private Sub Form_Click() Dim

23 查阅

[填空题] 下列程序的功能是:单击窗体时将随机生成10个0~99之间的随机数,并赋值给数组A,然后利用选择法排序;并把排序后的结果输出。

Private Sub Form_Click()

Dim A(9) As Integer,i As Integer

Dim j As Integer,k As Integer

Randomize

For i=0 To 9

A(i)=Int(100*Rnd)

Next i

For i=0 To 8

k= 【9】

For j=i To 9

If(A(k)>A(j))Then

【10】

End If

Next j

If k<>i Then

t=A(k):A(k)=A(i):A(i)=t

End If

Next i

For i=0 To 9

Print A(i),

Next i

Print

End Sub

参考答案:

[9]i [10]k=j

选择排序法是一种简单的排序方法,其方法步骤可描述如下: 设有N个元素要从小到大排列,选择法排序过程可分为N-1轮: 第一轮:从第1~N个数中找出最小的数和第一个数交换,第一个数排好。 第二轮:从第2~N个数中找出最小的数和第二个数交换,第二个数排好。 第i轮:从第i~N个数中找出最小的数和第i个数交换,第i个数排好。 第N-1轮:从第N-1~N个数中找出最小的数与第N-1个数交换,排序结束。 本题中变量k用来记下每一轮的最小值的下标,首先认为最小值为该轮的第一个元素 a(i),它的下标是i,因此[9]处应用“i”。最小的数要和后面的每一个元素比较,如果后面的元素小,则记下它的下标,故在[10]处应用k记下较小的元素下标,应填“k=j”。

计算机考试