Извлечь элементы массива

#include <Array.au3>

Dim $aArray[10] = [111, 222, 333, 444, 555, 666, 777, 888, 999, "AAA"], $DDD[0]

For $i = 0 To UBound($aArray)

_ArrayDisplay($aArray, $i)
Next

_ArrayDisplay($DDD, "11111")

#include <Array.au3>

Dim $aArray[10] = [111, 222, 333, 444, 555, 666, 777, 888, 999, "AAA"], $DDD[0], $k

For $i = 2 To UBound($aArray) - 1 Step 3
	$k += 1
	ReDim $DDD[$k]
	$DDD[$k-1] = $aArray[$i]
Next
_ArrayDisplay($DDD)