Proper divisors: Difference between revisions
Content added Content deleted
(add RPL) |
m (→{{header|RPL}}: typo) |
||
| Line 5,893: | Line 5,893: | ||
=={{header|RPL}}== |
=={{header|RPL}}== |
||
{{works with|HP|49}} |
{{works with|HP|49}} |
||
≪ DIVIS REVLIST TAIL |
≪ DIVIS REVLIST TAIL REVLIST <span style="color:grey">@ or DIVIS 1 OVER SIZE 1 - SUB</span> |
||
≫ '<span style="color:blue">PDIVIS</span>' STO |
≫ '<span style="color:blue">PDIVIS</span>' STO |
||
| Line 5,903: | Line 5,903: | ||
DROP |
DROP |
||
'''NEXT''' |
'''NEXT''' |
||
DROP n DUP SIZE |
DROP n DUP <span style="color:blue">PDIVIS</span> SIZE |
||
≫ ≫ '<span style="color:blue">TASK2</span>' STO |
≫ ≫ '<span style="color:blue">TASK2</span>' STO |
||