Разработка программы, реализующей алгоритм шифрования ГОСТ 28147-89
Категория реферата: Рефераты по информатике, программированию
Теги реферата: новые конспекты, шпоры по психологии
Добавил(а) на сайт: Korzovatyh.
Предыдущая страница реферата | 7 8 9 10 11 12 13 14 15 16 17 | Следующая страница реферата
encr := False;
s2 := copy(s1, 1, length(s1) - 4)
end else begin
encr := True;
s2 := s1 + '.gst'
end
end else begin
goto err
end;
if encr then begin
Randomize;
GS[0] := (Random($10000) SHL 16) + Random($10000);
GS[1] := (Random($10000) SHL 16) + Random($10000);
GOST_EncryptBlock(GS);
GOST_SetSeed(GS);
GOST_GammaBEn(s1, s2)
end else begin
GOST_GammaBDe(s1, s2)
end;
Burn;
exit;
err:
Burn;
WriteLn('gost_pa e|d <infile> <outfile>');
end.
Рекомендуем скачать другие рефераты по теме: сеть рефератов, написать сообщение.
Предыдущая страница реферата | 7 8 9 10 11 12 13 14 15 16 17 | Следующая страница реферата