Post History
APL (Dyalog Classic), 47 bytes i←+∘1⋄d←-∘1⋄s←×⍨⋄o←⎕∘←⋄{}{0⌈a×256≠a←⍎⍕⍺,⍵}/⌽0,⍞ Try it online!
Answer
#1: Initial revision
by
rak1507
·
2021-02-01T11:00:36Z (almost 4 years ago)
# [APL (Dyalog Classic)], 47 bytes
<!-- language-all: lang-apl -->
i←+∘1⋄d←-∘1⋄s←×⍨⋄o←⎕∘←⋄{}{0⌈a×256≠a←⍎⍕⍺,⍵}/⌽0,⍞
[Try it online!][TIO-kkmgoyhx]
[APL (Dyalog Classic)]: https://www.dyalog.com/
[TIO-kkmgoyhx]: https://tio.run/##hc2xCsIwEAbgPS/SQYtV0PcJDS0HhQg3SelWaqVN6VLqJI6@gIvg1De5F4l3pYO4@BPIxyV3p49ZaE46s2kYZxoRYk/1OfFAVb@i@rqlpjTscDGyp5Hcg23Z1A38ImjKvMgjams9jbv9gS53LWXXkRvIvdbknsWG2nfEunnpq/ogULzNJwoAEa1KlBEBGvHCf5m/Sjt8Ha5ZCYIFnsOaBwIslwTRwG/mxg8 "APL (Dyalog Classic) – Try It Online"