vb编程题：随机产生12个两位正整数，并找出其中的素数大神们帮帮忙
答案:2 悬赏:30 手机版
解决时间 2021-03-19 02:45
- 提问者网友：辞取
- 2021-03-18 19:34
vb编程题：随机产生12个两位正整数，并找出其中的素数大神们帮帮忙
最佳答案
- 五星知识达人网友：拜訪者
- 2021-03-18 20:46
别看了~~看了你也不会~~
全部回答
- 1楼网友：胯下狙击手
- 2021-03-18 21:53
不好意思，刚刚写错了~~ Private Sub Command1_Click() Dim x(12) As Integer Dim t As Integer Dim flag As Boolean flag = False For i = 0 To 11 Randomize x(i) = Int(90 * Rnd) + 10 Next i For i = 0 To 11 t = x(i) For j = 2 To t - 1 If x(i) Mod x(i) = 0 And x(i) Mod 1 = 0 And x(i) Mod j <> 0 Then List1.List(List1.ListIndex) = x(i) flag = True End If If flag = True Then Exit For End If Next j Next i End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯