Есть ли в делфи функция для преобразования десятичного числа в двоичное?
например надо ввести число 4 и получить 0100
и какого типа переменную можно использовать для него чтобы использовать операцию XOR?
По дате
По рейтингу
в компьютере все числа хранятся как двоичные так что преобразовывать ни чего не надо
код
var
x, y, z: Integer;
....
z := x xor y;
....
прекрасно работает
Write('Decatichnoe chislo: ');
Readln(iDch);
iDchr := iDch;
while iDch >= 2 do
begin
iMod := iDch mod 2;
iDch := iDch div 2;
sDv := IntToStr(iMod) + sDv;
end;
sDv := IntToStr(iDch) + sDv;
Writeln(iDchr, '(10) = ', sDv, '(2)');
Readln;
iDch - десятичное число.
sDv - двоичное.
XOR это ж boolean овский исключаемый тип (проверка исключения одного из другого)