RosettaCodeData/Task/Arrays/BASIC/arrays-8.basic

REDIM dynamicArray(10) AS INTEGER

dynamicArray(0) = -1
PRINT dynamicArray(0)

REDIM dynamicArray(20)

dynamicArray(20) = 1
PRINT dynamicArray(0), dynamicArray(20)
September Morn Update 2019-09-12 10:33:56 -07:00			`REDIM dynamicArray(10) AS INTEGER`

			`dynamicArray(0) = -1`
			`PRINT dynamicArray(0)`

			`REDIM dynamicArray(20)`

			`dynamicArray(20) = 1`
			`PRINT dynamicArray(0), dynamicArray(20)`