> Кто даст исходники алгоритма 8 битного шифрования на Pascal
> Basic C++
> или объяснит как написать соотв. прогу.
В смысле 8 битного, ведь существует много способов такого шифрования.
А вообще, читаешь из файла байты в массив однобайтовых величин. И каждый байт этого массива шифруешь например побитовой операцией xor(исключающее или):
Pascal:
var
i, size : word;
f : file;
mas : array[1..50000] of byte;
begin
assign(f,'имя файла');
reset(f,1);
size:=filesize(f);
blockread(f,mas,size);
close(f);
for i:= 1 to size do
begin
mas[i] = mas[i] xor 157;
end;
rewrite(f,1);
blockwrite(f,mas,size);
close(f);
end.
|
подробно о проекте
Анализ криптографических сетевых...
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
