{ exclusive or } writeLn(A:5, ' xor', B:6, ' yields', A xor B:7);