Two sum: Difference between revisions

{{Draft task|Arithmetic operations}}

</pre>

=={{header|RPL}}==

≪ → array sum

≪ { }

1 array SIZE '''FOR''' j

array j 0 PUT

sum array j GET -

'''IF''' POS '''THEN'''

j LAST

'''IF''' DUP2 > '''THEN''' SWAP '''END'''

R→C

'''IF''' DUP2 POS '''THEN''' DROP '''ELSE''' + '''END'''

'''END NEXT'''

≫ ≫ ‘<span style="color:blue">TWOSUM</span>’ STO

{0 2 11 19 90} 21 <span style="color:blue">TWOSUM</span>

{0 2 11 19 90} 22 <span style="color:blue">TWOSUM</span>

{0 2 3 3 4 11 17 17 18 19 90} 21 <span style="color:blue">TWOSUM</span>

{{out}}

<pre>

3: { (2,4) }

2: { }

1: { (2,10) (3,9) (4,9) (5,7) (5,8) }