Z dokumentów:
function bitor(p1 number, p2 number) return number is
begin
return p1-bitand(p1,p2)+p2;
end;
function bitxor(p1 number, p2 number) return number is
begin
return bitor(p1,p2)-bitand(p1,p2);
end;
Aby zobaczyć, że to działa, postępuj zgodnie z logiką, wprowadzając tylko zera i jedynki, a następnie nie oznacza to, że nie ma pożyczki ani próchnicy.
-- MarkusQ