Largest five adjacent number: Difference between revisions

Added Easylang
(Added BASIC256, Chipmunk Basic, Gambas,PureBasic, QBasic, True BASIC and Yabasic)
(Added Easylang)
 
(One intermediate revision by one other user not shown)
Line 500:
<pre>
Largest 5 adjacent digits are 99914
</pre>
 
=={{header|EasyLang}}==
<syntaxhighlight>
for i to 1000
n$ &= random 10 - 1
.
min = 99999
for i = 1 to 995
n = number substr n$ i 5
min = lower min n
max = higher max n
.
print min & " " & max
</syntaxhighlight>
{{out}}
<pre>
21 99768
</pre>
 
Line 983 ⟶ 1,001:
{{libheader|Wren-fmt}}
Very simple approach as there's little need for speed here.
<syntaxhighlight lang="ecmascriptwren">import "random" for Random
import "./fmt" for Fmt
 
var rand = Random.new()
2,060

edits