| 查看: 2525 | 回复: 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 这以上是求素数的过程，求下面求逆序素数的代码 万分感谢！！！ |
回复此楼» 猜你喜欢
情人节自我反思：在爱情中有过遗憾吗？
已经有10人回复
-
今年春晚有几个节目很不错，点赞！
已经有7人回复
-
基金正文30页指的是报告正文还是整个申请书
已经有5人回复
-
过年走亲戚时感受到了所开私家车的鄙视链
已经有5人回复
6楼2015-12-24 10:44:05
2楼2015-12-21 12:56:50
3楼2015-12-21 14:31:04
4楼2015-12-24 10:40:35