RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/BBC-BASIC/loop-over-multiple-arrays-simultaneously.basic
2023-07-01 13:44:08 -04:00

8 lines
239 B
Text

DIM array1$(2), array2$(2), array3%(2)
array1$() = "a", "b", "c"
array2$() = "A", "B", "C"
array3%() = 1, 2, 3
FOR index% = 0 TO 2
PRINT array1$(index%) ; array2$(index%) ; array3%(index%)
NEXT