А не проще сначала выбрать a[1], потом a[2] <> a[1], потом a[3] <> a[1] и a[3] <> a[2], и так далее?
Переведи алгоритм с русского на паскаль и все будет работать.
А если учесть, что чисел 6 и переменных 6, то можно каждому присвоить числа от 1 до 6 и использовать
случайное перемешивание.