[填空題] 以下程序的功能是：先將隨機產生的10個不同的整數放入數組a中，再將這10個數按升序方式輸出。請?zhí)羁铡? Private Sub Form_Click
2021-07-20
[填空題] 以下程序的功能是：先將隨機產生的10個不同的整數放入數組a中，再將這10個數按升序方式輸出。請?zhí)羁铡?/p>
Private Sub Form_Click()
Dim a(10)As Integer, i AS Integer
Randomize
i=0
Do
num=Int(Rnd*90)+10
For j=1 To i ’檢查新產生的隨機數是否與以前的相同，相同的無效
If num=a(j) Then
Exit For
End If
Next j
If j＞i Then
i=i+1
a(i)= (10)
End If
Loop While i＜10
For i=1 To 9
For j= (11) To 10
If a(i)＞a(j)Then temp=a(i): a(i)=a(j): (12)
Next j
Next i
For i=1 To 10
Print a(i)
Next i
End Sub
正確答案：(10)num (11)i+1 (12)a(j)=temp
參考解析：本題中第一個Do循環(huán)的作用是為數組a進行賦初值操作，找到一個合適的num就將其賦值給a(i)，因此第10空為num；第二個二重循環(huán)用于將數組a排序，其中使用的是冒泡排序，外循環(huán)從1到9，然后在每一次外循環(huán)中依次比較后面的元素與當前元素的大小，若比當前的元素值小則二者交換，因此內循環(huán)的范圍為i+1到10；兩數可以使用中間變量t進行交換。
詞條內容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域專業(yè)人士。