[填空題] 設(shè)有如下程序:Option Base 1Private Sub Commandl Click()Dim arrlDim Min As Integer
2021-07-20
[填空題] 設(shè)有如下程序:Option Base 1Private Sub Commandl Click()Dim arrlDim Min As Integer,i As Integerarrl=Array(12,435,76,-24,78,54,866,43)Min=()For i=2 To 8If arrl(i)<Min Then()NextPrint"最小值是:";MinEnd Sub以上程序的功能是:用Array函數(shù)建立一個含有8個元素的數(shù)組,然后查找并輸出該數(shù)組中各元素的最小值。請?zhí)羁铡?/p>正確答案:
arrl(1);Min=arrl(i)
參考解析:[評析] 由于有Option Base 1語句,所以數(shù)組下標是從1開始。本題的功能是查找8個數(shù)中的最小值,首先使用Array語句給數(shù)組賦值,然后把第一個值賦值給最小值變量,及Min=arrl(1),然后從第二個數(shù)開始循環(huán)與最小值比較,如果比最小值小,則把這個值賦值給Min,即Min=arrl(i)。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。