Z dokumentů:
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;
Chcete-li vidět, že to funguje, postupujte podle logiky s pouhými 0s a 1s pro vstup, a pak ne, že neexistují žádné výpůjčky nebo kazy.
-- MarkusQ