VB用for 循环算1-100的奇数跟偶数有多少个?

bdtymp 1年前 已收到1个回答 举报

多多小肥猪 幼苗

共回答了17个问题采纳率:82.4% 举报

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

1年前

1
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.020 s. - webmaster@yulucn.com