[填空題] 下列程序的功能是將數(shù)組中的奇數(shù)相加。給定的程序不完整，請將程序補充完整。Option Base 1 Private Sub form_Click()
2021-07-20
[填空題] 下列程序的功能是將數(shù)組中的奇數(shù)相加。給定的程序不完整，請將程序補充完整。
Option Base 1
Private Sub form_Click()
Dim k As Integer
Dim Total As Integer
Dim n
n = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
For k = 1 To UBound(n)
If 【13】 Then
Total = Total + n(k)
End If
Next k
Print Total
End Sub
正確答案：n(k)Mod 2＜＞0或n(k)Mod 2=1或n(k)/2＜＞ Int(n(k)/2)或n(k)/2-Int(n(k)/2)＞0解析：[分析]： 判定奇數(shù)的條件是數(shù)據(jù)除以2的余數(shù)不為0。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。