Cubic special primes: Difference between revisions
Added 11l
(→{{header|Wren}}: Now uses Int.isCube method.) |
Alextretyak (talk | contribs) (Added 11l) |
||
Line 6:
where '''n''' < '''15000'''.
<br><br>
=={{header|11l}}==
{{trans|FreeBASIC}}
<lang 11l>F is_prime(a)
I a == 2
R 1B
I a < 2 | a % 2 == 0
R 0B
L(i) (3 .. Int(sqrt(a))).step(2)
I a % i == 0
R 0B
R 1B
V p = 2
V n = 1
print(2, end' ‘ ’)
L p + n ^ 3 < 15000
I is_prime(p + n ^ 3)
p += n ^ 3
n = 1
print(p, end' ‘ ’)
E
n++</lang>
{{out}}
<pre>
2 3 11 19 83 1811 2027 2243 2251 2467 2531 2539 3539 3547 4547 5059 10891 12619 13619 13627 13691 13907 14419
</pre>
=={{header|Action!}}==
| |||