Имя: Пароль:
1C
1С v8
Конъюнкция двоичных чисел
0 Случайный прохожий
 
04.10.12
15:35
Добрый день.
Нужна функция, которая бы переводила десятичные числа в двоичные и делала конъюнкцию.
Пример:

6&4=4 (0110&0100=0100)
3&4=0 (0011&0100=0000)

В восьмерке не так давно. Может быть некоторые функции по переводу десятичных чисел в двоичные уже реализованы, ну или конъюнкция. Если нет - то может быть у кого-нибудь завалялись данные функции. Просто лень изобретать велосипед)
1 Жан Пердежон
 
04.10.12
15:38
хр, клянчить, пиши свои
2 МишКа
 
04.10.12
15:40
Нет такого в 1С. За ненадобностью. Зачем упаковывать флажки в число?
Памяти не хватает?
3 1Страх
 
04.10.12
15:45
Процедура КнопкаВыполнитьНажатие(Кнопка)
   Сообщить(БитовыйИ(ч1,ч2));
КонецПроцедуры

Функция БитовыйИ(Знач ч1, Знач ч2)    
   Результат = 0;
   К = 1;
   Пока ч1<>0 и ч2<>0 Цикл
       ост1 = ч1%2;    
       ост2 = ч2%2;    
       Результат = Результат+ост1*ост2*К;
       ч1 = (ч1-ост1)/2;
       ч2 = (ч2-ост2)/2;
       К = К*2;
   КонецЦикла;
   Возврат Результат;
КонецФункции
4 Случайный прохожий
 
04.10.12
16:04
(1) Ты когда захочешь на чем-нибудь покататься, а не на чем - ты что делаешь? Идешь в магазин и покупаешь велосипед. А нафига?) Изобрети свой и катайся)))
(2) Нет) Есть SQL-евская база данных другой программы. Данные из нее извлекаются по такому принципу
(3) Большое спасибо, вечером опробую :)
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший