24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 2550  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

rop678

新虫 (初入文坛)

[求助] 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
这以上是求素数的过程,求下面求逆序素数的代码 万分感谢!!!
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

陌上过客

新虫 (初入文坛)

你可以选择把所有素数存在数组中,然后在数组中判断是否逆序也为素数

发自小木虫Android客户端
6楼2015-12-24 10:44:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

尼摩2012

金虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
输出后再排序下不就可以啦?
你只需在一点上自命不凡!
2楼2015-12-21 12:56:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

rop678

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by 尼摩2012 at 2015-12-21 12:56:50
输出后再排序下不就可以啦?

vb初学 就是具体如何逆序排序不清楚 希望能指教一下 谢谢
3楼2015-12-21 14:31:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

陌上过客

新虫 (初入文坛)

【答案】应助回帖

感谢参与,应助指数 +1
引用回帖:
3楼: Originally posted by rop678 at 2015-12-21 14:31:04
vb初学 就是具体如何逆序排序不清楚 希望能指教一下 谢谢...

逆序就是指把数字倒过来输出,通俗的讲,一个三位数,正序输出是先输出个位,接着十位,最后百位,而逆序是先百位后十位最后个位

发自小木虫Android客户端
4楼2015-12-24 10:40:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 11408软件工程求调剂 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 21:50 by zhq0425
[考研] 0856求调剂 +3 楒桉 2026-03-28 3/150 2026-03-28 21:12 by 唐沐儿
[考研] 330一志愿中国海洋大学 化学工程 085602 有读博意愿 求调剂 +3 wywy.. 2026-03-27 4/200 2026-03-28 03:32 by fmesaito
[考研] 265求调剂 +8 小木虫085600 2026-03-27 8/400 2026-03-27 22:16 by 无际的草原
[考研] 求调剂 +4 零八# 2026-03-27 4/200 2026-03-27 18:07 by yu221
[考研] 考研调剂 +4 Sanmu-124 2026-03-26 4/200 2026-03-27 17:49 by kiokin
[考研] 272求调剂 +7 脚滑的守法公民 2026-03-27 7/350 2026-03-27 17:23 by laoshidan
[考研] 348求调剂 +4 小懒虫不懒了 2026-03-27 5/250 2026-03-27 12:47 by 果果妈咪
[考研] 一志愿华东理工大学081700,初试分数271 +6 kotoko_ik 2026-03-23 7/350 2026-03-27 12:29 by 惠州彭于晏
[考研] 考研调剂 +10 呼呼?~+123456 2026-03-24 10/500 2026-03-27 11:46 by wangjy2002
[考研] 考研调剂 +9 小蜡新笔 2026-03-26 9/450 2026-03-27 11:10 by 不吃魚的貓
[考研] 一志愿陕师大生物学071000,298分,求调剂 +5 SYA! 2026-03-23 5/250 2026-03-27 09:29 by 不吃魚的貓
[考研] 材料学硕,求调剂 6+5 糖葫芦888ll 2026-03-22 10/500 2026-03-27 08:18 by hypershenger
[考研] 0703化学求调剂 +3 丹青奶盖 2026-03-26 5/250 2026-03-26 20:11 by macy2011
[考研] 生物学 296 求调剂 +4 朵朵- 2026-03-26 6/300 2026-03-26 19:01 by 不吃魚的貓
[考研] 材料考研求调剂 +3 Dendel 2026-03-23 6/300 2026-03-26 17:51 by fmesaito
[考研] 271求调剂 +6 生如夏花… 2026-03-22 6/300 2026-03-26 16:48 by 张凯十八号
[考研] 环境专硕324分求调剂推荐 +5 轩小宁—— 2026-03-26 5/250 2026-03-26 12:05 by i_cooler
[考研] 一志愿哈工大,085400,320,求调剂 +4 gdlf9999 2026-03-24 4/200 2026-03-25 23:01 by boxking200
[考研] 284求调剂 +3 yanzhixue111 2026-03-23 6/300 2026-03-23 22:58 by pswait
信息提示
请填处理意见