Представление числа в виде суммы степеней двойки #240725

Напр., 16 = 8 + 4 + 2 + 1 = 1*2^3 + 1*2^2 + 1*2^1 + 1*2^0 Как это реализовать на языке 1С. Ну или просто алгоритм???

Последовательным делением на два естественно....

Ник смени, математик :) %2 в цикле пока остаток Цел( /2) не ноль - номер итерации и есть твои степени

function DecToBin(val Arg1, Arg2)    if Arg1 < 2 then        Arg2 = right("00000000000000000000000000000000" + (string(Arg1) + Arg2), 32);    else        Arg2 = LongInt(int(Arg1/2), ?(int(Arg1/2) = (Arg1/2), "0", "1") + Arg2);    endif;    return Arg2; endfunction

двоичный код

function DecToBin(val Arg1, Arg2)   if Arg1 < 2 then       Arg2 = right("00000000000000000000000000000000" + (string(Arg1) + Arg2), 32);   else       Arg2 = DecToBin(int(Arg1/2), ?(int(Arg1/2) = (Arg1/2), "0", "1") + Arg2);   endif;   return Arg2; endfunction

школа... 8класс... информатика... сейчас такое наверно и в ранних классах изучают...

8 + 4 + 2 + 1 = 15 <> 16!!!

Любопытно, зачем это надо?

+к тому же, ты сам написал решение.... теперь просто обрати это в цикл....

Как то писал обработку по переводу числа из любой в любую систему исчисления от (2 до 36 ричной). Но где-то потерялась. Могу за деньги восстановить :))

Ещё вариант реализации, см. . ДесЧисло,БинЧисло - реквизиты формы

Вот тебе нож в спину

Как вы блин запоминаете где что лежит? Мне такое барахло проще и быстрее по новой написать, чем искать...

функции от Рупора

закладки там... всякие...

Ну когда помнишь где лежит проще стянуть, чем заново писать