某人編寫了下列程序,用來求10個整數(shù)(整數(shù)從鍵盤輸入)中的最大值:Private Sub Command1_Click() D
某人編寫了下列程序，用來求10個整數(shù)(整數(shù)從鍵盤輸入)中的最大值： Private Sub Command1_Click() Dim a(10) As Integer, max As Integer For k=1 To 10 a(k)=InputBox("輸入一個整數(shù)") Next k max=0 For k=1 To 10 If a(k)＞max Then max=a(k) End If Next k Print max End Sub 運行程序時發(fā)現(xiàn)，當(dāng)輸入10個正數(shù)時，可以得到正確結(jié)果，但輸入10個負(fù)數(shù)時結(jié)果是錯誤的。程序需要修改。下列修改中可以得到正確運行結(jié)果的是( )。
A．把Ifa(k)＞max Then 改為 If a(k)＜max Then
B．把max=a(k)改為a(k)=max
C．把第2個循環(huán)語句For k=1 To 10改為For k=2 To 10
D．把max=O改為max=a(10)
正確答案：D解析：本題考查的考點是有關(guān)循環(huán)和數(shù)組的。本題為了實現(xiàn)求取最大值，首先應(yīng)該假設(shè)數(shù)組中的某一個數(shù)就是最大值，再依次與數(shù)組元素比較，一旦某個元素比當(dāng)前的最大值大，就把它作為新的最大值。max初值設(shè)為。是不可以的，它沒有考慮到數(shù)組元素都小于0的情況。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。