[填空題] 下面程序的功能是找出給定的12個(gè)數(shù)中最大的一個(gè)數(shù)，然后輸出這個(gè)數(shù)以及它在原來(lái)12個(gè)數(shù)中的位置。請(qǐng)?jiān)谙聞澗€處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。 Opt
2021-07-20
[填空題] 下面程序的功能是找出給定的12個(gè)數(shù)中最大的一個(gè)數(shù)，然后輸出這個(gè)數(shù)以及它在原來(lái)12個(gè)數(shù)中的位置。請(qǐng)?jiān)谙聞澗€處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。
Option Base 1
Private Sub Form_Click0
Dim x
x = Array(57,-9,17,42,-31,46,11,8,6,-4,3,90)
Max= 1
For k = 2 To 10 Step 1
If x(k)＞x(Max) Then
______
End If
Next k
y=______
Print Max, y
End Sub
正確答案：Max=k x(Max)
參考解析：在數(shù)組中查找多個(gè)數(shù)中最大數(shù)的算法是：首先設(shè)變量Max為1，從第一個(gè)數(shù)組元素開(kāi)始與x(Max)對(duì)比，如果數(shù)組元素大于x(Max)，則Max記錄該數(shù)組元素的下標(biāo)，比較完后，Max記錄了最大數(shù)的下標(biāo)。所以第1個(gè)橫線處，應(yīng)填寫Max=k，用Max記錄較大數(shù)的下標(biāo)；第2個(gè)橫線處，用y來(lái)存儲(chǔ)元素的最大值。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。