[填空題] 設(shè)有以下程序：Option Base 1Private Sub Command1_Click( ) Dim arr1 ,Max as Intege
2021-07-20
[填空題] 設(shè)有以下程序：
Option Base 1
Private Sub Command1_Click( )
Dim arr1 ,Max as Integer
art1 = Array(12,435,76,24,78,54,866,43)
【14】 = arr1(1)
For i = 1 To 8
If arrl(i)＞Max Then 【15】
Next i
Print "最大值："； Max
End Sub
以上程序的功能是：用Array函數(shù)建立一個(gè)含有8個(gè)元素的數(shù)組，然后查找并輸出該數(shù)組中元素的最大值。
正確答案：[14]Max [15] Max＝arr1(i)
參考解析：Max＝arr1(1)是先將第1個(gè)元素設(shè)為最大值，然后在循環(huán)中逐一和數(shù)組元素arr1(i)進(jìn)行比較，如果比當(dāng)前的Max值大，則更新Max。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。