Two sum: Difference between revisions

Content added Content deleted
No edit summary
Line 1,618: Line 1,618:
{2,4}
{2,4}
</pre>
</pre>

=={{header|Phixmonti}}==
<lang Phixmonti>include ..\Utilitys.pmt

def two_sum /# arr num -- n #/
var num
1 var i
len var j
true
while
i get swap j get rot + >ps
tps num == if
ps> drop j get swap i get rot 2 tolist false
else
ps> num < if i 1 + var i else j 1 - var j endif true
endif
i j < and
endwhile
len 2 > if drop ( ) endif
enddef

( 0 2 11 19 90 )
21 two_sum ?
25 two_sum ?</lang>
{{out}}
<pre>[2, 19]
[]

=== Press any key to exit ===</pre>


=={{header|PicoLisp}}==
=={{header|PicoLisp}}==