// *** было: ***
А = 5; //0101
Б = 6; //0110

//Побитовых функций не было: биты
//разбирали делением с остатком
Результат = 0;
Вес = 1;
Для Н = 1 По 32 Цикл
    Если А % 2 = 1 И Б % 2 = 1 Тогда
        Результат = Результат + Вес;
    КонецЕсли;
    А = Цел(А / 2);
    Б = Цел(Б / 2);
    Вес = Вес * 2;
КонецЦикла;

Сообщить(Результат);
//4

// *** in version 8.3.11: ***
А = 5; //0101
Б = 6; //0110

//Аргументы считаются 32-битными
//целыми числами без знака
В1 = ПобитовоеИ(А, Б);
//В1 = 4 (0100)

В2 = ПобитовоеИли(А, Б);
//В2 = 7 (0111)

В3 = ПобитовоеИсключительноеИли(А, Б);
//В3 = 3 (0011)

Сообщить(В1);