[填空题] 以下程序用来计算由键盘输入的个数中正数之和、负数之和、正数的个数、负数的个数。其中用C累加负数之和，IC累加负数的个数，D累加正数之和，ID累加正数的个数。请在空白处填入适当的内容，将程序

16 查阅

[填空题] 以下程序用来计算由键盘输入的个数中正数之和、负数之和、正数的个数、负数的个数。其中用C累加负数之和，IC累加负数的个数，D累加正数之和，ID累加正数的个数。请在空白处填入适当的内容，将程序补充完整。

Private Sub Command1_Click

N=10

C=0:IC=0:D=0:ID=0

For K=1 To N

A=Val(InputBox(“请输入A"))

If A＜0 Then C=C+A:IC=IC+1

If A＞0 Then D= (14)

Next K

Print“负数的个数为：”，IC

Print”负数的和为：”，C

Print”正数的个数为：”ID

Print”正数的和为：”，D

End Sub

参考答案:

D+A:ID=ID+1

根据待填空上一行A为负值的表达式应该可以比较容易得到答案。D既然是整数的累加和，所以D应该表达为D=D+A，与此同时D应该自加1统计正数的个数。两条语句之间用冒号“：”分隔。