100以内的奇数和偶数之和代码 VB

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/24 11:22:17
100以内的奇数和偶数之和代码VB100以内的奇数和偶数之和代码VB100以内的奇数和偶数之和代码VBDimiasInteger,jasInteger,oasIntegerj=0o=0Fori=1To

100以内的奇数和偶数之和代码 VB
100以内的奇数和偶数之和代码 VB

100以内的奇数和偶数之和代码 VB
Dim i as Integer,j as Integer,o as Integer
j = 0
o = 0
For i = 1 To 100 Step 2
j = j + i
o = o + (i + 1)
Next
Debug.print "100以内的奇数和:" & j & ",偶数和:" & o