Difference between revisions of "Xor/de"
From Lazarus wiki
Jump to navigationJump to search (XOR wurde beschrieben und Beispiele hinzugefügt) |
|||
Line 37: | Line 37: | ||
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''' = | ||
+ | Mit '''xor''' kann man Daten verschlüsseln, dazu ein kleines Beispiel, mit einem String. | ||
+ | <syntaxhighlight lang="pascal"> | ||
+ | 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. | ||
+ | </syntaxhighlight> | ||
+ | |||
--[[User:ReneHSZ|ReneHSZ]] ([[User talk:ReneHSZ|talk]]) 14:34, 12 July 2016 (CEST) | --[[User:ReneHSZ|ReneHSZ]] ([[User talk:ReneHSZ|talk]]) 14:34, 12 July 2016 (CEST) | ||
[[category:Pascal/de]]{{AutoCategory}} | [[category:Pascal/de]]{{AutoCategory}} | ||
[[Category:Reserved words/de]] | [[Category:Reserved words/de]] |
Revision as of 18:27, 14 January 2018
│
Deutsch (de) │
English (en) │
suomi (fi) │
français (fr) │
русский (ru) │
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.