" " Eratoshenes 2-3-5-7 wheel 1000. C-like ,
primes_1000()
{
int wh[48] = {10,2,4,2,4,6,2,6,4,2,4,6,6,2,6,4,2,6,4,6,8,4,2,4,
2,4,8,6,4,6,2,4,6,2,6,6,4,2,4,6,2,6,4,2,4,2,10,2};
int m[7][4] = { {1,11,11,11*11}, {2,13,13,13*13}, {3,17,17,17*17},
{4,19,19,19*19}, {5,23,23,23*23}, {6,29,29,29*29},
{7,31,31,31*31} };
int i=1, p=11, k=0;
print(2); print(3); print(5); print(7);
p = 11;
do {
for( k=0; k < 7; ++k) {
if ( p == m[k][3] ) {
m[k][2] += wh[ m[k][0]++ ];
m[k][3] = m[k][1] * m[k][2];
m[k][0] %= 48;
break;
}
}
if (k == 7) {
print(p);
}
p += wh[i++];
i %= 48;
} while ( p < 1000 );
}
500 4 , {11,13,17,19} , 2,3,5,7.
(. 1 100).
m - (multiplesOf(p) = map( multiplyBy(p), rollWheelFrom(p) ), ). , min- .
m/p >
primes, , .