Anonymous user
Largest five adjacent number: Difference between revisions
→{{header|Julia}}
Alextretyak (talk | contribs) (Added 11l) |
|||
Line 375:
julia> println("Maximum is $m at position $pos.")
Maximum is 99999 at position 763.
</pre>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>Max[FromDigits /@ Partition[RandomInteger[{0, 9}, 1000], 5, 1]]</lang>
{{out}}<pre>
99954
</pre>
|