Sum of primes in odd positions is prime: Difference between revisions

</pre>

=={{header|RPL}}==

≪ → max

≪ { } 0 2

1 max '''FOR''' j

SWAP OVER + SWAP

'''IF''' OVER ISPRIME? '''THEN'''

j OVER 4 PICK →V3

4 ROLL SWAP + UNROT

'''END'''

NEXTPRIME NEXTPRIME

'''IF''' DUP max ≥ '''THEN''' max 'j' STO '''END'''

2 '''STEP'''

DROP2

≫ ≫ '<span style="color:blue">TASK</span>' STO

1000 <span style="color:blue">TASK</span>

{{out}}

<pre>

1:. {[1. 2. 2.] [3. 5. 7.] [11. 31. 89.] [27. 103. 659.] [35. 149. 1181.] [67. 331. 5021.] [91. 467. 9923.] [95. 499. 10909.] [99. 523. 11941.] [119. 653. 17959.] [143. 823. 26879.]}