Pick random element: Difference between revisions

add gw basic
(Added Wren)
(add gw basic)
Line 593:
[25, 30, 1, 450, 3, 78].sort{new Random()}?.take(1)[0]
</lang>
 
=={{header|GW-BASIC}}==
<lang gwbasic>10 RANDOMIZE TIMER : REM set random number seed to something arbitrary
20 DIM ARR(10) : REM initialise array
30 FOR I = 1 TO 10
40 ARR(I) = I*I : REM squares of the integers is OK as a demo
50 NEXT I
60 C = 1 + INT(RND*10) : REM get a random index from 1 to 10 inclusive
70 PRINT ARR(C)</lang>
{{out}}<pre> 81</pre>
 
=={{header|Haskell}}==
781

edits