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

4 lines
102 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
list$ = "a,b,c,d,e,f,g,h,i,j"
letter = rnd(1) * 10
print "Selected letter:"; word$(list$,letter,",")