Last list item: Difference between revisions
Content added Content deleted
(→{{header|Ruby}}: print initial values) |
|||
Line 1,416: | Line 1,416: | ||
Last item is: 621 |
Last item is: 621 |
||
done... |
done... |
||
</pre> |
|||
=={{header|RPL}}== |
|||
≪ '''WHILE''' DUP SIZE 1 > '''REPEAT''' |
|||
DUP LIST→ → len |
|||
≪ 0 1 '''FOR''' j |
|||
2 len j - '''START''' |
|||
len j - ROLL '''IF''' DUP2 < '''THEN''' SWAP '''END NEXT''' |
|||
len ROLLD |
|||
'''NEXT''' |
|||
len ROLL len ROLL + len 1 - →LIST |
|||
≫ '''END''' |
|||
≫ ''''LASTL'''' STO |
|||
{{in}} |
|||
<pre> |
|||
{ 6 11 14 25 49 69 81 123 243 } LASTL |
|||
</pre> |
|||
{{out}} |
|||
<pre> |
|||
9: { 6 11 14 25 49 69 81 123 243 } |
|||
8: { 243 123 14 25 49 69 81 17 } |
|||
7: { 243 123 81 25 49 69 31 } |
|||
6: { 243 123 81 69 49 56 } |
|||
5: { 243 123 81 69 105 } |
|||
4: { 243 123 105 150 } |
|||
3: { 243 150 228 } |
|||
2: { 243 378 } |
|||
1: { 621 } |
|||
</pre> |
</pre> |
||