| 查看: 2694 | 回复: 6 | ||
[求助]
vb中怎么编码求逆序素数 已有2人参与
|
|
例如先求出100-300的素数，然后怎样求出其逆序也为素数的所有数？ option base 1 private sub command1_click() dim count as integer picture1.print"100-300得所有素数" for i =100 to 300 for j = 2 to sqr(i) if i mod j=0 then exit for next j if i mod j<>0 then count=count+1 picture1.print a(count) end if next i picture1.print end sub 这以上是求素数的过程，求下面求逆序素数的代码 万分感谢！！！ |
回复此楼» 猜你喜欢
面上的水很深
已经有25人回复
-
国社科通讯评审
已经有7人回复
-
5个%2F，非固定段22个字母
已经有13人回复
-
小木虫没落了，除了祈祷帖子，几乎看不到有价值的帖子
已经有16人回复
-
生命口C13面上会评时间
已经有11人回复
-
生命口面上会评结束了吗大家有知道结果吗？现在还没有结果正常不？
已经有9人回复
-
投英文期刊如何查重
已经有6人回复
-
伯胺上甲基求助
已经有7人回复
-
生生命学部会评
已经有4人回复
-
H口，面上，时间戳7月7日。
已经有3人回复
2楼2015-12-21 12:56:50
3楼2015-12-21 14:31:04
4楼2015-12-24 10:40:35
5楼2015-12-24 10:42:17
6楼2015-12-24 10:44:05
7楼2015-12-24 21:08:47