Статистика | Зарегистрировано на сайте: Всего: 51657
Онлайн всего: 6 Гостей: 6 Пользователей: 0
|
|
Каталог статей
Простой пример XOR шифрования
Вот ужасно простой пример XOR шифрования - работает без глюков.
var key, text, longkey, result : string;
i : integer; toto, c : char;begin
for i := 0 to (length(text) div length(key)) do longkey := longkey + key;
for i := 1 to length(text) do begin toto := chr((ord(text[i]) XOR ord(longkey[i]))); // XOR алгоритм result := result + toto; end;end;
|
|
Просмотров: 565
| Рейтинг: 1.0/
8
Оштрафовать
| Жаловаться на материал |
|
|