Difference between revisions of "Xor/de"
From Lazarus wiki
Jump to navigationJump to search| (One intermediate revision by the same user not shown) | |||
| Line 1: | Line 1: | ||
{{Xor}} | {{Xor}} | ||
| − | = Boolescher XOR-Operator = | + | = XOR = |
| + | == Boolescher XOR-Operator == | ||
Ein boolescher '''XOR'''-Operator (von engl. e'''X'''clusive '''OR''', exklusives Oder) ist ein Operator in Pascal. Das Ergebnis ist <strong>TRUE</strong>, wenn ein Operand <strong>TRUE</strong> ist und der andere <strong>FALSE</strong>. | Ein boolescher '''XOR'''-Operator (von engl. e'''X'''clusive '''OR''', exklusives Oder) ist ein Operator in Pascal. Das Ergebnis ist <strong>TRUE</strong>, wenn ein Operand <strong>TRUE</strong> ist und der andere <strong>FALSE</strong>. | ||
| − | == Beispiele == | + | === Beispiele === |
<strong> | <strong> | ||
{| class="wikitable" | {| class="wikitable" | ||
| Line 21: | Line 22: | ||
</strong> | </strong> | ||
| − | = Bitweiser XOR-Operator = | + | == Bitweiser XOR-Operator == |
Ein bitweises <strong>XOR</strong> (von engl. e'''X'''clusive '''OR''', exklusives Oder) wird auf zwei gleich lange Operanden angewendet. Das Ergebnis ist <strong>0</strong> wenn die Bits gleich sind, sonst ist es <strong>1</strong>. | Ein bitweises <strong>XOR</strong> (von engl. e'''X'''clusive '''OR''', exklusives Oder) wird auf zwei gleich lange Operanden angewendet. Das Ergebnis ist <strong>0</strong> wenn die Bits gleich sind, sonst ist es <strong>1</strong>. | ||
| − | == Beispiele == | + | === Beispiele === |
{| class="wikitable" | {| class="wikitable" | ||
|- | |- | ||
| Line 34: | Line 35: | ||
|} | |} | ||
| − | = Unterschied zum OR-Operator = | + | == Unterschied zum OR-Operator == |
Das Ergebnis von <strong>OR</strong> ist <strong>TRUE</strong>, wenn mindestens ein Operand <strong>TRUE</strong> ist. | Das Ergebnis von <strong>OR</strong> ist <strong>TRUE</strong>, wenn mindestens ein Operand <strong>TRUE</strong> ist. | ||
Das Ergebnis von <strong>XOR</strong> ist <strong>TRUE</strong>, wenn genau ein Operand <strong>TRUE</strong> ist. | Das Ergebnis von <strong>XOR</strong> ist <strong>TRUE</strong>, wenn genau ein Operand <strong>TRUE</strong> ist. | ||
| − | = Verschlüsseln mit '''XOR''' = | + | == Verschlüsseln mit '''XOR''' == |
Mit '''xor''' kann man Daten verschlüsseln, dazu ein kleines Beispiel, mit einem String. | Mit '''xor''' kann man Daten verschlüsseln, dazu ein kleines Beispiel, mit einem String. | ||
<syntaxhighlight lang="pascal"> | <syntaxhighlight lang="pascal"> | ||
const | const | ||
hello = 'Hello World !'; | hello = 'Hello World !'; | ||
| − | Key = %11001010; // Schlüsselbyte | + | Key = %11001010; // Schlüsselbyte |
var | var | ||
i: integer; | i: integer; | ||
| − | sVerschluesselt, sEntschluesselt: ShortString; | + | sVerschluesselt, |
| + | sEntschluesselt: ShortString; | ||
begin | begin | ||
Latest revision as of 19:22, 14 January 2018
│
Deutsch (de) │
English (en) │
suomi (fi) │
français (fr) │
русский (ru) │
XOR
Boolescher XOR-Operator
Ein boolescher XOR-Operator (von engl. eXclusive OR, exklusives Oder) ist ein Operator in Pascal. Das Ergebnis ist TRUE, wenn ein Operand TRUE ist und der andere FALSE.
Beispiele
| A | B | A XOR B |
|---|---|---|
| FALSE | FALSE | FALSE |
| FALSE | TRUE | TRUE |
| TRUE | FALSE | TRUE |
| TRUE | TRUE | FALSE |
Bitweiser XOR-Operator
Ein bitweises XOR (von engl. eXclusive OR, exklusives Oder) wird auf zwei gleich lange Operanden angewendet. Das Ergebnis ist 0 wenn die Bits gleich sind, sonst ist es 1.
Beispiele
| A | 0101 | 0101 |
|---|---|---|
| B | 0110 | 0011 |
| A XOR B | 0011 | 0110 |
Unterschied zum OR-Operator
Das Ergebnis von OR ist TRUE, wenn mindestens ein Operand TRUE ist. Das Ergebnis von XOR ist TRUE, wenn genau ein Operand TRUE ist.
Verschlüsseln mit XOR
Mit xor kann man Daten verschlüsseln, dazu ein kleines Beispiel, mit einem String.
const
hello = 'Hello World !';
Key = %11001010; // Schlüsselbyte
var
i: integer;
sVerschluesselt,
sEntschluesselt: ShortString;
begin
// String verschlüsseln
for i := 0 to Length(hello) do begin
sVerschluesselt[i] := Char(Byte(hello[i]) xor Key);
end;
// String entschlüsseln
for i := 0 to Length(hello) do begin
sEntschluesselt[i] := Char(Byte(sVerschluesselt[i]) xor Key);
end;
// Zur Überprüfung ausgeben
WriteLn(sVerschluesselt); // Undefinierte Zeichen
WriteLn(sEntschluesselt); // Wieder "Hello World !"
end.
