Изменения
→Специализация алгоритма для генерации следующего битового вектора
* Вместо 0 записываем 1
* Дописываем минимально возможный хвост из нулей
'''function''' nextVector(a:array[1..n] of byte):array[1..n] of byte; // n - длинна длина вектора
'''for''' i = n '''downto''' 1
'''if''' a[i] == 0