Largest difference between adjacent primes: Difference between revisions
Content added Content deleted
(→J: add) |
(added RPL) |
||
| Line 1,066: | Line 1,066: | ||
Largest difference is = 114 |
Largest difference is = 114 |
||
done... |
done... |
||
</pre> |
|||
{{works with|HP|49}} |
|||
≪ 1000000 PREVPRIME |
|||
DUP PREVPRIME DUP2 - UNROT |
|||
'''DO''' NIP DUP PREVPRIME |
|||
DUP2 - 4 PICK |
|||
'''IF''' OVER < '''THEN''' 3 UNPICK '''ELSE''' DROP '''END''' |
|||
'''UNTIL''' DUP 2 == '''END''' |
|||
DROP2 |
|||
≫ '<span style="color:blue">TASK</span>' STO |
|||
{{out}} |
|||
<pre> |
|||
1: 114 |
|||
</pre> |
</pre> |
||