RosettaCodeData/Task/Loops-Foreach/BASIC/loops-foreach-2.basic
2017-09-25 22:28:19 +02:00

8 lines
251 B
Text

DIM collection$(8)
collection$() = "The", "quick", "brown", "fox", "jumps", \
\ "over", "the", "lazy", "dog."
FOR index% = 0 TO DIM(collection$(), 1)
PRINT collection$(index%) " ";
NEXT
PRINT