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;

要看到这些工作,请按照逻辑使用0和1进行输入,然后不要说没有借用或龋齿.

– MarkusQ