De Polignac numbers: Difference between revisions
m
→RPL: making 3 compliant
Line 757:
=={{header|RPL}}==
Polignac really made a fool of himself for all time by writing to the French Academy of Science that he had verified his "theorem" up to 3,000,000
{{works with|Halcyon Calc|4.2.7}}
≪ IF DUP 5 ≤ THEN
Line 781:
1 CF
DUP LN 2 LN / FLOOR
WHILE DUP 0 ≥ 1 FC? AND REPEAT
2 OVER ^ 3 PICK SWAP -
IF PRIM? THEN 1 SF END
Line 797:
{{out}}
<pre>
1: { 1
</pre>
|