RosettaCodeData/Task/Arrays/BaCon/arrays-2.bacon
2023-07-01 13:44:08 -04:00

9 lines
281 B
Text

DECLARE A$[11] = {"January", "February", "March", "April", "May", \
"June", "July", "August", "September", "October", "November", "December"} TYPE STRING
i = 0
'---dynamic index the end of an array is always null terminated
WHILE (A$[i] ISNOT NULL)
PRINT A$[i]
INCR i
WEND