Safe primes and unsafe primes: Difference between revisions
m
→{{header|Phix}}: use get_prime() builtin
m (Minor edit to C++ code) |
m (→{{header|Phix}}: use get_prime() builtin) |
||
Line 1,315:
=={{header|Phix}}==
<lang Phix>sequence safe = {}, unsafe = {}▼
if p>hi then return lo end if
▲sequence safe = {}, unsafe = {}
▲procedure filter_range(integer lo, hi)
▲ integer p = primes[i]
if p>2 and is_prime((p-1)/2) then
safe &= p
Line 1,328 ⟶ 1,325:
unsafe &= p
end if
end
end function
integer
ls = length(safe),
{} = filter_range(
printf(1,"The first 35 safe primes: %
printf(1,"Count of safe primes below 1,000,000: %,d\n",ls)
printf(1,"Count of safe primes below 10,000,000: %,d\n",length(safe))
printf(1,"The first 40 unsafe primes: %
printf(1,"Count of unsafe primes below 1,000,000: %,d\n",lu)
printf(1,"Count of unsafe primes below 10,000,000: %,d\n",length(unsafe))</lang>
| |||