Pick random element: Difference between revisions
Content added Content deleted
(Added Wren) |
(add gw basic) |
||
Line 593: | Line 593: | ||
[25, 30, 1, 450, 3, 78].sort{new Random()}?.take(1)[0] |
[25, 30, 1, 450, 3, 78].sort{new Random()}?.take(1)[0] |
||
</lang> |
</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}}== |
=={{header|Haskell}}== |