Вниз
Скачать: CL | DM;

Шифрование и дешифрование текста   Найти похожие ветки 

← →
highlander   (2004-11-22 12:06) [0]

Собственно говоря, это задача по Паскалю.
Над каждым символом файла выполнятется такое превращение: его биты циклически смещаются на К позиций вправо (либо влево). Написать програму, которая за данным К шифрует и дешифрует текст.


← →
TUser ©   (2004-11-22 12:11) [1]

b:=ord(c);
b1:=b shr k;
b2:=b shl (8-k);
c:=char(b1+b2);

Это очень отстойный алгоритм шифрования.


← →
highlander   (2004-11-22 12:27) [2]

To TUser ©: но ведь это просто задача по информатике ;-)
отстойный ли алгоритм или нет, это никого не интерисует.
Кстати, а как организовать цикл? ведь в условии сказно о циклическом смещении...
это через while not eof?


← →
TUser ©   (2004-11-22 12:30) [3]


> это через while not eof?

Можно. Можно еще TFileStream, но не в ТП


← →
highlander   (2004-11-22 12:43) [4]

ясно...огромное человеческое спасибо TUser ©


← →
Amoeba ©   (2004-11-22 16:32) [5]

Циклическое смещение битов осуществляется не с помощью SHL или SHR, а с помощью ROL или ROR (но это уже ассемблерные команды).

TUser ©   (22.11.04 12:11) [1] Для шифрования вообще не годится (даже для плохого!), т.к. происходит потеря крайних битов поскольку циклического сдвига при этом не происходит.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.037 c
4-1098448993
antonioxxx
2004-10-22 16:43
2004.12.05
Доступ к (драйверу) мыши


6-1096396967
Наташа
2004-09-28 22:42
2004.12.05
Какой самый быстрый способ скачивания файлов?


3-1099648336
vvv
2004-11-05 12:52
2004.12.05
MasterSource-MasterField


1-1100324580
Макс
2004-11-13 08:43
2004.12.05
определитель матрицы комплексных чисел


1-1101209423
Артем К.
2004-11-23 14:30
2004.12.05
Объединение ячеек в Excel при помощи Delphi?




   Наверх