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

4 lines
102 B
Plaintext

list$ = "a,b,c,d,e,f,g,h,i,j"
letter = rnd(1) * 10
print "Selected letter:"; word$(list$,letter,",")