O(n)线性筛选n以内的素数

O(n)线性筛选n以内的素数

（1）对于任何一个素数p，都不可能表示为两个数的乘积

（2）对于任何一个合数m = p₁^a1p₂^a2…p_m^am,这里p₁< p₂ < … <p_m，都能使用p₁^a1-1p₂^a2…p_m^am* p₁进行筛选

 1 fillchar(prime,sizeof(prime),1);
 2 prime[1]:=false;
 3 fillchar(p,sizeof(p),0);
 4 total:=0;
 5 for i:=2 to n do
 6   begin
 7     if prime[i] then begin inc(total);p[total]:=i;end;
 8     for j:=1 to total do
 9       begin
10         if p[j]*i>n then break;
11         prime[p[j]*i]:=false;
12         if i mod p[j]=0 then break;
13       end;
14   end;
15 for i:=1 to total do   writeln(p[i]);

 以下为略过偶数的线性筛选，速度还能提高一半。

 

转载于:https://www.cnblogs.com/jznoi/p/4057088.html