用VB程序编写程序输出50~200之间不能同时被3和7整除的自然数,并统计其个数
问题描述:
用VB程序编写程序输出50~200之间不能同时被3和7整除的自然数,并统计其个数
答
Sub Main()
dim i as integer, n as integer
n = 0
for i = 50 to 200
if i mod 3 <> 0 and i mod 7 <> 0 then n = n + 1
next
messagebox n
End Sub谢谢你next后面一句不懂那个不懂意义不大,你当成 Print n 来理解就行了。哦,thankyou
Dim i As Integer, n As Integer
n = 0
For i = 50 To 200
If i Mod 3 = 0 And i Mod 7 = 0 Then
Else
n = n + 1
End If
Next
Print n
End
谢谢x11提醒。