RosettaCodeData/Task/Pick-random-element/BASIC256/pick-random-element.basic

dim a$ = {"Zero", "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine"}

for i = 1 to 5
    randInt = int(rand * 10)
    print a$[randInt]
next i