mirror of
https://github.com/ultimatepp/ultimatepp.git
synced 2026-05-15 14:16:07 -06:00
17 lines
227 B
Text
17 lines
227 B
Text
sieve()
|
|
{
|
|
N = 2000;
|
|
sieve = N * [1];
|
|
prime = [];
|
|
:ii = 0;
|
|
for(i = 2; i < N; i++) {
|
|
if(sieve[i]) {
|
|
prime[] = i;
|
|
for(j = i; j < N; j += i) {
|
|
sieve[j] = 0;
|
|
:ii++;
|
|
}
|
|
}
|
|
}
|
|
return prime;
|
|
}
|