Question

编程输出十个数中所有负数并求负数和

Answer 1

1、打开Dev-c++软件，点击“新建源代码”。

2、具体程序如下：#include <stdio.h>，int main(){int a[10];int i,m=0,n=0;printf("请输入10个整数\n")。

3、编写完程序之后，点击运行即可得出结果。最后的结果是根据自己输入的10个整数值为基础来进行运行的，每次输入的数组值不同，结果也会不同。

4、其中for表示循环结构，i 表示循环条件，在编写程序时，注意给赋予增值变量的条件，此次程序的i的初始值从0开始，到9结束，共进行10次循环。

5、if(a[i]>0) m++ 中表示的是，从循环里找出正数，每次找出的正数进行存储在m里。注意这时if里的数组要注意定义为大于0，目的是为了找出10个整数里的正数。

6、最后一点要注意输出结果的那个代码要用到10-m-n，使其算出最后一个我们要求的负数的个数。

Answer 2

Private Sub Form_Load()
    Show
    Dim s1 As String
    Dim s2() As String
    Dim i As Long
    Dim sz As String
    Dim sf As String
    s1 = InputBox("请输入十个数，用空格分割")
    s2 = Split(s1, " ")
    For i = LBound(s2) To UBound(s2)
        If CLng(s2(i)) < 0 Then '小于0则表示为负数
            sf = sf + CStr(s2(i)) + " "
        Else '正数
            sz = sz + CStr(s2(i)) + " "
        End If
    Next i
    Print "其中的正数有："; sz
    Print "其中的负数有："; sf
End Sub