Изменения

Перейти к: навигация, поиск

Коды Грея для перестановок

3 байта убрано, 04:25, 28 декабря 2011
Нет описания правки
== Псевдокод получения следующего кода Грея ==
Пусть нам известен код Грея для длины $n - 1$, записанный в массив из строк $perm[i](j)$, где $i$ - номер перестановки, а $j$ номера элементов перестановок(номерация начинается с единицы). При этом переменная $t = true$, $j = 1$:
procedure grey_code(t: boolean; j: integer);
var
i, c: integer;
begin
if j <= (n - 1)! then {условие выхода из рекурсии}
begin
end;
end;
end;
94
правки

Навигация