Dim i, j
j = 0
For i = 1 To 100
If (i Mod 3 = 0 Or i Mod 7 = 0) And i Mod 21 <> 0 Then
Print i,
j = j + 1
If j = 7 Then
Print
j = 0
End If
End If
Next i
用VB,输出1到100之间能被3或7整除,但不能同时被3和7整除的整数,且每七个数换一行.
用VB,输出1到100之间能被3或7整除,但不能同时被3和7整除的整数,且每七个数换一行.
其他人气:400 ℃时间:2019-09-09 17:43:28
优质解答
我来回答
类似推荐
猜你喜欢
- 1学校小星星合唱团中,男生人数是女生的9/11,后来又新增了8名男生,这时男女生人数刚好相等.这个合唱团有多少名女生?
- 2以w+x+y结尾的动词ing怎样变
- 3常见的语言特色有哪些类型?这样的语言特色有怎样的表达效果?
- 4写出六个表示人多的四字词语.
- 5It is necessary for us to work hard every day 同义句
- 68.A、B两地相距420千米,两辆汽车同时从A地开往B地,甲车每小时行42千米,乙 车每小时28千米.甲车到达B
- 7张奶奶家共养鸡和鸭150只,鸡的只数是鸭的5倍.张奶奶家养鸡和鸭各多少只?
- 8一块周长是60m的正方形土地与一块高为20m的三角形土地面积相等,这块三角形的底是多少米?
- 92.Judy _____ the Great Wall twice,and now she still _____ to go there A.went to; wantedB.goes t
- 10跑36千米大约需要2时,路程与时间的比大约是( ),比值是( ),这个比值表示的是( )