Código Delphi [-] var A, B, C: Integer; begin A := $0F; B := $75; C := A xor B; // C es ahora $7A C := C xor B; // C es ahora $0F end;
var A, B, C: Integer; begin A := $0F; B := $75; C := A xor B; // C es ahora $7A C := C xor B; // C es ahora $0F end;