Safe primes and unsafe primes: Difference between revisions
m
→{{header|Delphi}}
No edit summary |
|||
Line 967:
I:=Sieve.NextPrime(I);
end;
Result:=Result+'Count = '+
finally Sieve.Free; end;
end;
Line 1,009 ⟶ 1,010:
Count = 35
Safe Primes Under 1,000,000:
Count =
Safe Primes Under 10,000,000:
Count =
The first 40 Unsafe primes:
2 3 13 17 19
Line 1,023 ⟶ 1,024:
Count = 40
Unsafe Primes Under 1,000,000:
Count =
Unsafe Primes Under 10,000,000:
Count =
Elapsed Time:
</pre>
=={{header|F_Sharp|F#}}==
| |||