求100到200之间的所有素数,VB编程
3个回答
2011-06-11
展开全部
vb 编程 找出100到200之间的所有素数
个很简单,如果你要代码就hi我吧
马上就好
2.打开的是吉祥,看到的是鸿运,愿所有祝福涌向您,祈望您心情舒畅万事顺意,愿这美好心愿化为最真挚的问候传给您!
个很简单,如果你要代码就hi我吧
马上就好
2.打开的是吉祥,看到的是鸿运,愿所有祝福涌向您,祈望您心情舒畅万事顺意,愿这美好心愿化为最真挚的问候传给您!
展开全部
Private Sub Command2_Click()
For i = 101 To 199 Step 2
For j = 2 To Sqr(i)
If i Mod j = 0 Then Exit For
Next
If j > Sqr(i) Then
Print i;
c = c + 1
If c Mod 5 = 0 Then
Print
End If
End If
Next
End Sub
For i = 101 To 199 Step 2
For j = 2 To Sqr(i)
If i Mod j = 0 Then Exit For
Next
If j > Sqr(i) Then
Print i;
c = c + 1
If c Mod 5 = 0 Then
End If
End If
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Form_click()
Dim n As Integer, i As Integer
For n = 100 To 200
For i = 2 To n - 1
If n Mod i = 0 Then Exit For
Next
If i > n - 1 Then Print n & "是素数"
Next
End Sub
Dim n As Integer, i As Integer
For n = 100 To 200
For i = 2 To n - 1
If n Mod i = 0 Then Exit For
Next
If i > n - 1 Then Print n & "是素数"
Next
End Sub
更多追问追答
追问
i不是1到n—1之间的吗,怎么会大于n-1呢
追答
1 需要么?1所有比它大的正整数 都能整除
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询