[填空題] 以下程序用來(lái)計(jì)算由鍵盤(pán)輸入的N個(gè)數(shù)中正數(shù)之和,負(fù)數(shù)之和,正數(shù)的個(gè)數(shù),負(fù)數(shù)的個(gè)數(shù)。其中用C累加負(fù)數(shù)之和,IC累加負(fù)數(shù)的個(gè)數(shù),D累加正數(shù)之和,ID累加正
2021-07-20
[填空題] 以下程序用來(lái)計(jì)算由鍵盤(pán)輸入的N個(gè)數(shù)中正數(shù)之和,負(fù)數(shù)之和,正數(shù)的個(gè)數(shù),負(fù)數(shù)的個(gè)數(shù)。其中用C累加負(fù)數(shù)之和,IC累加負(fù)數(shù)的個(gè)數(shù),D累加正數(shù)之和,ID累加正數(shù)的個(gè)數(shù)。
Privae Sub Commandl_Click
N=10
C=0:IC=0:D=0:ID=0
For =1 To N
A=Val(1nputBox(“請(qǐng)輸入A”))
IFA<0 Then C=C+A:IC=IC+1
lf A>O Then D=
Next K
Print"負(fù)數(shù)的個(gè)數(shù)為:",IC
Print"負(fù)數(shù)的和為:",C
Print"正數(shù)的個(gè)數(shù)為:",ID
Print"正數(shù)的和為:",D
End Sub
正確答案:D+A:ID=ID+1
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。