[Массивы] Выдаёт ошибку при использовании массива

Func Million()
	$million[1] = PixelGetColor (545, 246)
	$million[2] = PixelGetColor (536, 246)
	$million[3] = PixelGetColor (530, 246)
	$million[4] = PixelGetColor (520, 246)
	EndFunc

Func Million()
    Dim $million[5]
    $million[1] = PixelGetColor (545, 246)
    $million[2] = PixelGetColor (536, 246)
    $million[3] = PixelGetColor (530, 246)
    $million[4] = PixelGetColor (520, 246)
    EndFunc

$N = 10
Dim $a[$N], $b[$N]; Первоначальная инициализация
For $i = 0 to $N - 1
	$a[$i] = Random(0, 1, 1)
	$b[$i] = Random(0, 1, 1); рандомные матрицы
Next
For $i = 0 to $N - 1; поэлементная проверка и выдача результата проверки в консоль
	ConsoleWrite($a[$i] = $b[$i])
	ConsoleWrite(@CRLF)
Next