免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 9393 | 回复: 1
打印 上一主题 下一主题

[练习] 多少个半质数 [复制链接]

论坛徽章:
7
戌狗
日期:2013-12-15 20:43:38技术图书徽章
日期:2014-03-05 01:33:12技术图书徽章
日期:2014-03-15 20:31:17未羊
日期:2014-03-25 23:48:20丑牛
日期:2014-04-07 22:37:44巳蛇
日期:2014-04-11 21:58:0915-16赛季CBA联赛之青岛
日期:2016-03-17 20:36:13
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2014-02-20 03:15 |只看该作者 |倒序浏览
定义: 半质数
如果一个数恰好是两个质数的乘积(可以相同),则称它为半质数。

前几个半质数是 4, 6, 9, 10, 14, 15, 21, 22, 25, 26.....

问题:

输入两个正整数 x, y ( x < y ),问 x, y 之间有多少个半质数?

论坛徽章:
7
戌狗
日期:2013-12-15 20:43:38技术图书徽章
日期:2014-03-05 01:33:12技术图书徽章
日期:2014-03-15 20:31:17未羊
日期:2014-03-25 23:48:20丑牛
日期:2014-04-07 22:37:44巳蛇
日期:2014-04-11 21:58:0915-16赛季CBA联赛之青岛
日期:2016-03-17 20:36:13
2 [报告]
发表于 2014-02-26 01:21 |只看该作者
  1. #!/usr/bin/ruby -w

  2. x, y  = print("x, y ") || gets.scan(/\d+/).map(&:to_i)
  3. y2    = (y / 2).to_i
  4. prime = (0 .. y2).to_a
  5. sqrt  = Math.sqrt(y).to_i
  6. sqrt2 = Math.sqrt(y2).to_i
  7. count = 0
  8. prime[0] = prime[1] = nil

  9. prime.each do |i|
  10.   next unless i
  11.   break if i > sqrt2
  12.   (i ** 2).step(y2, i) {|j| prime[j] = nil }
  13. end

  14. prime.compact!

  15. prime.each_with_index do |p1, i|
  16.   break if p1 > sqrt
  17.   prime[i .. -1].each do |p2|
  18.     sp = p1 * p2
  19.     sp > y ? break : sp > x && count += 1
  20.   end
  21. end
  22.   
  23. puts count
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP