云外归鸟工作室网站

标题: 埃拉托色尼筛选最优数算法(测速用) [打印本页]

作者: 云外归鸟 时间: 2010-10-7 18:32
标题: 埃拉托色尼筛选最优数算法(测速用)
输出 "埃拉托色尼筛选最优数算法"

变量为整数型 size = 8190
变量为整数型 sizepl = 8191
变量 flags() 为整数型
重定义 flags(sizepl)  为整数型
变量为整数型 i, prime, k, 总数, iter, 开始时间,elapsedtime
输出 "10 计数器"
开始时间 = 取启动时间()*1000
计次循环 iter = 1 至 10
总数 = 0
计次循环 i = 0 至 size
  flags(i) = 1
计次循环尾

计次循环 i = 0 至 size
如果 (flags(i)) 则
prime = i + i + 3
   k = i + prime
   条件循环 (k <= size)
flags(k) = 0
k += prime
   条件循环尾
   总数 += 1
如果结束
计次循环尾

计次循环尾
elapsedtime = 取启动时间()*1000 - 开始时间
输出总数 & " 最好"
输出 "所需时间 = " & elapsedtime & "毫秒" & 取启动时间()
延时

易语言用了40毫秒, NB用了4毫秒

作者: 和尚 时间: 2012-11-23 23:42
我这里1毫秒...

欢迎光临云外归鸟工作室网站 (http://www.ywgn.net/)