DIM list$(5) list$() = "The", "five", "boxing", "wizards", "jump", "quickly" chosen% = RND(6) PRINT "Item " ; chosen% " was chosen which is '" list$(chosen%-1) "'"