作业帮VB用for 循环算1-100的奇数跟偶数有多少个?
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/17 16:52:42
x) sz>eEZ~}nY-O?Ot>]2醉OvI*'W~
E**X)(ИL P!$_hX3
(曟`RW kLUV0]sS y)
i`_jE PWq"A@VɺP(v,\(F 1[ Ȥe
VB用for 循环算1-100的奇数跟偶数有多少个?
VB用for 循环算1-100的奇数跟偶数有多少个?
VB用for 循环算1-100的奇数跟偶数有多少个?
q = 0: e = 0
For i = 1 To 100
If i Mod 2 = 0 Then
e = e + 1
Else
q = q + 1
End If
Next
Print "奇数个数=";q, "偶数个数=";e