用集合筛选法求200以内的素数;

原创 2015年07月10日 09:43:57
program a;
const n=200;
var s,p:set of 2..n;
    nxt,j,t:integer;
begin
 s:=[2..n];p:=[];
 nxt:=2;t:=0;
 repeat
   while not(nxt in s) do
      nxt:=succ(nxt);
   p:=p+[nxt];j:=nxt;
   while j<=n do begin
                   s:=s-[j];inc(j,nxt);
                 end;
   if nxt in p then begin
                       inc(t);write(nxt:6);
                    end;
   until s=[];
 end.
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

Java之用厄拉多塞筛选法求n以内的所有素数

import java.util.Scanner; public class eladuosai { public static void main(String []args) /*...

筛选法求100以内的素数

筛选法求100以内的素数:  基本思想:通俗讲从2开始依次将100以内2的倍数(>1)置为1,将3的倍数(>1)置为1...以此将100以内所有非1的元素的倍数(>1)均置为1;最后输出非1的元素即为...

筛选法求2-1000以内的素数

筛法求素数首先要建立筛子,这里利用数组作筛子。下标对应于数,相应下标变量的值标志是否在筛子中:为1表示在筛子中,为。表示已被筛去,不在筛子中。然后找每一轮筛选种子,筛选种子是完成一轮筛选后的下一个最小...

常数优化的筛法求N以内素数表(附C语言、Java代码)

普通的筛法就不多说了,今天动了点脑筋,对普通的筛法做了点常数优化,主要是利用素数除了2以外全是奇数,那偶数就能排除掉不用再管了,再进一步优化就是只需排除素数的所有奇数倍。时间复杂度好像是O(N+1/4...
  • lyltim
  • lyltim
  • 2011-09-30 20:31
  • 1953

POJ 1007 Difference Between Primes(线性筛法求N以内的素数表)

Difference Between Primes Time Limit:1000MS     Memory Limit:32768KB     64bit IO Format:%I64d &...

j筛选法求素数

  • 2012-12-29 08:26
  • 567B
  • 下载

求N以内素数个数--粗暴方式及筛选法

素数,是除了1和它本身之外不再被其他的除数整除。 使用程序求N以内素数个数问题,在各种语言的基础教程中都会讲到。 一般而言,求取素数可以使用粗暴的从2开始遍历到自己,每次拿自己整除这些遍历的数,若可以...

筛选法求素数

  • 2013-11-02 22:21
  • 542B
  • 下载

筛选法求素数

  • 2012-10-09 12:59
  • 1.05MB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)