Anonymous user
Neighbour primes: Difference between revisions
m
→{{header|REXX}}: changed the GENP subroutine.
(Added Sidef) |
m (→{{header|REXX}}: changed the GENP subroutine.) |
||
Line 607:
/* [↓] generate more primes ≤ high.*/
do j=@.#+2 by 2 to limit /*find odd primes from here on. */
parse var j '' -1 _;
if j//3==0 then
do k=5 while s.k<=j /* [↓] divide by the known odd primes.*/
if j // @.k == 0 then iterate j /*Is J ÷ X? Then not prime. ___ */
|