Largest five adjacent number: Difference between revisions

Content added Content deleted
m (→‎{{header|Raku}}: Show minimum too, toss some Unicode in there for amusements sake, Do it 5 times for variety)
Line 56: Line 56:


=={{header|Raku}}==
=={{header|Raku}}==
Show minimum too because... why not?
<lang perl6>say (^10).roll(1000).rotor(5 => -4)».join.max</lang>

{{out|Sample output (it's random)}}
Use some Tamil Unicode numbers for brevity, and for amusement purposes.
<pre>99625</pre>

௰ - Tamil number ten
௲ - Tamil number one thousand

Do it 5 times for variety, it's random after all.

<lang perl6>(^).roll().rotor(5 => -4)».join.minmax.bounds.put xx 5</lang>
{{out|Sample output}}
<pre>00371 99975
00012 99982
00008 99995
00012 99945
00127 99972</pre>


=={{header|Ring}}==
=={{header|Ring}}==