RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/BaCon/loop-over-multiple-arrays-simultaneously.bacon

10 lines
190 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
DECLARE a1$[] = {"a", "b", "c"} TYPE STRING
DECLARE a2$[] = {"A", "B", "C"} TYPE STRING
DECLARE a3[] = {1, 2, 3} TYPE int
WHILE (a3[i] <= 3)
PRINT a1$[i], a2$[i], a3[i]
INCR i
WEND