RosettaCodeData/Task/Pick-random-element/Run-BASIC/pick-random-element.run

4 lines
102 B
Text
Raw Permalink Normal View History

2013-04-10 23:57:08 -07:00
list$ = "a,b,c,d,e,f,g,h,i,j"
letter = rnd(1) * 10
print "Selected letter:"; word$(list$,letter,",")