Last list item: Difference between revisions
Added Quackery.
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
(Added Quackery.) |
||
Line 1,111:
[6, 81, 243, 14, 25, 49, 123, 69, 11] ==> [621]
</pre>
=={{header|Quackery}}==
<syntaxhighlight lang="Quackery"> [ behead
-1 swap rot
witheach
[ 2dup > iff
[ dip
[ 2drop i^ ] ]
else drop ]
drop 1+ ] is least ( [ --> n )
' [ 6 81 243 14 25 49 123 69 11 ]
[ dup echo cr
dup size 1 > while
dup least pluck
swap
dup least pluck
rot + join
again ]
0 peek echo</syntaxhighlight>
{{out}}
<pre>[ 6 81 243 14 25 49 123 69 11 ]
[ 81 243 14 25 49 123 69 17 ]
[ 81 243 25 49 123 69 31 ]
[ 81 243 49 123 69 56 ]
[ 81 243 123 69 105 ]
[ 243 123 105 150 ]
[ 243 150 228 ]
[ 243 378 ]
[ 621 ]
621</pre>
=={{header|Raku}}==
| |||