RosettaCodeData/Task/Arrays/BaCon/arrays-2.bacon

10 lines
281 B
Plaintext

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