Next special primes: Difference between revisions
Content added Content deleted
(Realize in F#) |
(julia example) |
||
Line 249: | Line 249: | ||
967 1049 82 |
967 1049 82 |
||
</pre> |
</pre> |
||
=={{header|Julia}}== |
|||
<lang julia>using Primes |
|||
let |
|||
println("Special primes under 1050:\nPrime1 Prime2 Gap") |
|||
println(" 2 3 1") |
|||
pmask = primesmask(1, 1050) |
|||
n, gap = 3, 2 |
|||
while n + gap < 1050 |
|||
if pmask[n + gap] |
|||
println(lpad(n, 6), lpad(n + gap, 6), lpad(gap, 4)) |
|||
n += gap |
|||
end |
|||
gap += 2 |
|||
end |
|||
end |
|||
</lang>{{out}} |
|||
<pre> |
|||
Special primes under 1050: |
|||
Prime1 Prime2 Gap |
|||
2 3 1 |
|||
3 5 2 |
|||
5 11 6 |
|||
11 19 8 |
|||
19 29 10 |
|||
29 41 12 |
|||
41 59 18 |
|||
59 79 20 |
|||
79 101 22 |
|||
101 127 26 |
|||
127 157 30 |
|||
157 191 34 |
|||
191 227 36 |
|||
227 269 42 |
|||
269 313 44 |
|||
313 359 46 |
|||
359 409 50 |
|||
409 461 52 |
|||
461 521 60 |
|||
521 587 66 |
|||
587 659 72 |
|||
659 733 74 |
|||
733 809 76 |
|||
809 887 78 |
|||
887 967 80 |
|||
967 1049 82 |
|||
</pre> |
|||
=={{header|Pascal}}== |
=={{header|Pascal}}== |