Перебор всех строковых комбинаций "0" и "1" в порядке возрастания числа единиц

FastCode 1510 12 22 67

Очень полезная функция для организации перебора комбинаций. Без циклов!

Автор: ildarovich

Функция СледующийКод(Код)
    Возврат Прав(СтрЗаменить(Код, "1", "0") + Лев("1" + Код, Найти(Код, "0")) 
    + ?(Найти(Код, "01"), "0", "") + Сред(Код, Найти(Код + "01", "01") + 2), СтрДлина(Код))
КонецФункции
0

См. также

Сортировка слиянием

РасшифроватьПереборомСертификатов (БСП)

СтроковоеПредставлениеТипа (БСП)

ПриОпределенииПорядкаРазделовКомандногоИнтерфейса (БСП)

ЗарегистрироватьРезультатВыполненияОперации (БСП)

СтрокаСЧисломДляЛюбогоЯзыка (БСП)

ВерсияПлатформыВЧисло (БСП)

Получить разницу дат в [секундах, минутах, днях, ...]

Модератору