求奇偶数:
For i = 1 to 100
If i/2 i\2 Then
msg =msg & i & "是奇数"
Else
msg =msg & i & "是偶数"
Next i
Print msg
能被3和5同时整除:
For i = 1 to 100
If i/3 = i\3 And i/5 = i\5 Then
msg =msg & i & "能被3和5同时整除"
Else
msg =msg & i & "不能被3和5同时整除"
End If
Next i
Print msg
vb中求1-100之间的偶数和奇数还有能被3和5同时整除的数的程序应该怎么编写
vb中求1-100之间的偶数和奇数还有能被3和5同时整除的数的程序应该怎么编写
其他人气:746 ℃时间:2019-10-17 00:49:28
优质解答
我来回答
类似推荐
猜你喜欢
- 1求关于桥的诗词或者散文文章
- 23和9,4和8,5和15,11和22的最大公因数和最小公倍数
- 3what is the more common name of the Sword Lily?
- 4功到自然成
- 5词语对对碰
- 6已知x1,x2是方程x^2-(k-2)x+(k^2+3k+5)=0(k∈R)的两个实数根,则x1^2+x2^2的最大值是______
- 7英语翻译
- 8Were you born yesterday?翻译~
- 9they are interviewing calculate for the job of sales manager 怎么翻译
- 10美国是不是把get翻译为获取的时候过去分词才用got?平时都是用gotten?