| 查看: 2551 | 回复: 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 这以上是求素数的过程,求下面求逆序素数的代码 万分感谢!!! |
» 猜你喜欢
295求调剂
已经有3人回复
数一英一271专硕(085401)求调剂,可跨
已经有7人回复
070305高分子化学与物理 304分求调剂
已经有6人回复
0703化学调剂,求导师收
已经有10人回复
各位老师好,我的一志愿为北京科技大学085601材料专硕
已经有5人回复
一志愿太原理工安全工程300分,求调剂
已经有6人回复
0856求调剂
已经有4人回复
11408软件工程求调剂
已经有3人回复
一志愿211 初试270分 求调剂
已经有8人回复
300求调剂,材料科学英一数二
已经有6人回复

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














回复此楼