作业帮 > 综合 > 作业

输入一组数字,统计正负各有多少的VFP程序怎么写

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/12 11:15:17
输入一组数字,统计正负各有多少的VFP程序怎么写
输入一组数字,统计正负各有多少的VFP程序怎么写
CLEAR
aaa="1,2,3,4,5,-1,-2,-3,-4,0" &&aaaa为您输入的那组数字,用逗号隔开
lncount = Getwordcount(aaa,",")
k=0
j=0
For i = 1 To lncount
lcourref = Getwordnum(aaa,i,",")
IF VAL(lcourref) < 0
j = j + 1
ELSE
k = k + 1
endif
NEXT
j &&负数的个数 j=4
k &&整数的个数 k=6