Minimal (?) protype-based language.
Nie możesz wybrać więcej, niż 25 tematów Tematy muszą się zaczynać od litery lub cyfry, mogą zawierać myślniki ('-') i mogą mieć do 35 znaków.
 

38 wiersze
865 B

// M1 TYPECODES+DELOPT
// 178589010 nodes evaluated in 2.129754 seconds = 83854290 nodes/sec
// 178589010 nodes evaluated in 2.126711 seconds = 83974273 nodes/sec
numbers = 8192; // 1028 primes
repeats = 200;
count = 0;
then = cputime();
evals = evaluations();
for (n = 0; n < repeats; n = n + 1) {
print("\r", n, "/", repeats);
sieve = [];
count = 0;
for (i in numbers) sieve.push(nil);
for (i = 2; i < numbers; i = i + 1) {
if (!sieve[i]) {
// print(i, " ");
count = count + 1;
for (k = i+i; k < numbers; k = k+i)
sieve[k] = #t;
}
}
count;
}
evals = evaluations() - evals;
now = cputime();
secs = now - then;
print("\r", count, " primes in the first ", numbers, " numbers\n");
print(evals, " nodes evaluated in ",
secs, " seconds = ",
round(evals / secs), " nodes/sec\n");