大侠帮我看看，求1000以内的素数

显示全部楼层 · 2012-11-13 13:34:08

汗！多年不玩编程，这个真不好帮到你。以下文字不保证正确。不过求素素嘛，如果是我做程序，我的思路就是：从1到自身，建立循环，进行相除，如果结果的小数部分大于0，即将一个变量自加1。在循环控制条件中，如果检测到这个变量大于2，即提前结束循环。如果循环完毕，就将该数字记录下来。这样从1到1000两级嵌套循环完毕，所有素素就都求出来了。我看你的思路好像跟这个差不多，只要不出现编写的错误，就没问题了。...

千问 · 2012-11-13 13:34:08

Option ExplicitPrivate Sub Form_click()Dim a As Integer, b As Integer, c As Integera=1Doa = a + 1For b = 2 To a - 1If a Mod b = 0 Then Exit ForNext bIf b = ...

千问 · 2012-11-13 13:34:08

挨个查kan...

千问 · 2012-11-13 13:34:08

先用软件运行一下啊看哪儿报错...

千问 · 2012-11-13 13:34:08

J从2开始吧...