Подскажите, археологу.
http://www.delphisources.ru/forum/sh...ad.php?t=21043 из этой темы
Код:
function BinToGray(b: integer): integer;
begin
BinToGray := b xor (b shr 1)
end;
В функцию на вход идет целое число, поэтому вводя 10110, я ввожу 10 тысяч сто десять. Логично, что выдает 13505
Как на вход давать двоичное представление, т.е даю 10110, на выходе получаю 11101 ?