Collect and sort square numbers in ascending order from three lists: Difference between revisions
Content added Content deleted
(→{{header|haskell}}: Added a version in Haskell) |
(Added Quackery.) |
||
Line 406: | Line 406: | ||
done... |
done... |
||
</pre> |
</pre> |
||
=={{header|Quackery}}== |
|||
<code>sqrt</code> is defined at [[Isqrt (integer square root) of X#Quackery]]. |
|||
<syntaxhighlight lang="Quackery"> [] |
|||
' [ [ 3 4 34 25 9 12 36 56 36 ] |
|||
[ 2 8 81 169 34 55 76 49 7 ] |
|||
[ 75 121 75 144 35 16 46 35 ] ] |
|||
witheach |
|||
[ witheach |
|||
[ dup issquare iff |
|||
join else drop ] ] |
|||
sort |
|||
echo</syntaxhighlight> |
|||
{{out}} |
|||
<pre>[ 4 9 16 25 36 36 49 81 121 144 169 ]</pre> |
|||
=={{header|Raku}}== |
=={{header|Raku}}== |