用 VB 编程 找出1-100 里面的素数
答案:1 悬赏:30
解决时间 2021-01-12 08:58
- 提问者网友：欺烟
- 2021-01-11 22:28
用 VB 编程 找出1-100 里面的素数
最佳答案
- 二级知识专家网友：酒安江南
- 2021-01-11 23:01
Private Sub Command1_Click()
For i = 1 To 100
For j = 2 To i - 1
If i Mod j = 0 Then Exit For
Next j
If j > i - 1 And i <> 1 Then
Print i;
n = n + 1
If n Mod 5 = 0 Then Print
End If
Next i
End Sub
For i = 1 To 100
For j = 2 To i - 1
If i Mod j = 0 Then Exit For
Next j
If j > i - 1 And i <> 1 Then
Print i;
n = n + 1
If n Mod 5 = 0 Then Print
End If
Next i
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息