dim a$(9) a$(0)="Zero" a$(1)="One" a$(2)="Two" a$(3)="Three" a$(4)="Four" a$(5)="Five" a$(6)="Six" a$(7)="Seven" a$(8)="Eight" a$(9)="Nine" for i = 1 to 5 randInt = int(ran(10)) print a$(randInt) next i