RosettaCodeData/Task/Array-concatenation/BaCon/array-concatenation.bacon
2023-07-01 13:44:08 -04:00

9 lines
159 B
Text

DECLARE a[] = { 1, 2, 3, 4, 5 }
DECLARE b[] = { 6, 7, 8, 9, 10 }
DECLARE c ARRAY UBOUND(a) + UBOUND(b)
FOR x = 0 TO 4
c[x] = a[x]
c[x+5] = b[x]
NEXT