[填空題] 設(shè)有如下程序,查找并輸出該數(shù)組中的最小值,請在空白處填上合適的代碼,將程序補充完整。 Option Base 1 Private Sub Com
2021-07-20
[填空題] 設(shè)有如下程序,查找并輸出該數(shù)組中的最小值,請在空白處填上合適的代碼,將程序補充完整。
Option Base 1
Private Sub Command1_Click()
Dim arr1
Dim Min As Integer,i AS Integer
arr1=Array(12,435,76,-24,78,54,866,43)
Min=arr1(1)
For i=2 To 8
If arr1(i)<Min Then______
Next i
Print "最小值是:"; Min
End Sub
正確答案:Min=arrl(i)
參考解析:題目要求輸出數(shù)組中的最小值,分析程序可知,本程序求數(shù)組最小值的算法是,假設(shè)最小的值是第一個數(shù)組元素,并把它存在Min變量中,然后從數(shù)組的第二個元素開始逐個與Min變量對比,如果有比Min更小的數(shù),則賦值給Min,這樣對比到數(shù)組最后一個元素時,就能找到最小的元素,且它存儲在Min變量中,因此最后只要輸出Min變量值即可。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。