51330

Шифрование текста по ключу аддитивными методами (гаммированием)

Лабораторная работа

Информатика, кибернетика и программирование

Цель работы: Научиться составлять программы шифрования текста, основываясь на алгоритме RSA. Вывод: научился составлять программы шифрования текста, основываясь на алгоритме RSA.

Русский

2014-02-09

86.14 KB

10 чел.

Цель работы: Научиться составлять программы шифрования текста, основываясь на алгоритме RSA.

Изм.

Лист

№ докум.

Подпись

Дата

Лист

1

Лабораторная работа №6

Разраб.

Карецкий

Пров.

Смулаковский

Н. Контр.

Утв.

Шифрование текста по ключу аддитивными методами (гаммированием).

Лит.

Листов

3

КОГУ 59П-3

 

Ход работы:  

program RSA;

{$N+}

uses crt;

const min=100; max=200;

var p,q,d,Y:longint;

   n,m,e,cmp:comp;

   s,s2:string;

   i,j:integer;

   si,s3:array[1..255] of Longint;

procedure npoctbIe(var W:longint);

var simp:boolean;i:longint;

begin

repeat

W:=random(max-min)+min;

if W mod 2=0 then simp:=false

else  begin

simp:=true; i:=3;

while (i<=trunc(sqrt(W))) do begin

if trunc(W) mod i=0 then

simp:=false

else i:=i+2;

if not simp then break;

end; end;

until simp; end;

function B3aumHo(t:comp):longint;

var k:integer;i,Y2:longint;

   R,mx,mn:comp;b:boolean;

begin  k:=0;i:=0;

randomize;Y2:=Y;

repeat

R:=random(10000)+3000;

mn:=R; mx:=t;

if trunc(mn) mod 2<>0 then k:=2

else k:=1;

i:=1+k; b:=true;

while i<=trunc(mn) do begin

if (trunc(mn) mod i=0) and(trunc(mx) mod i=0) then

begin b:=false; break; end; i:=i+k; end;

until b;

B3aumHo:=trunc(R);

end;

function viE:comp;

var ee:comp;u:integer;

begin       u:=0; ee:=1;

while trunc(ee*d) mod trunc(M)<>1 do begin

ee:=ee+1; end; viE:=ee;

end;

function Vozstep(x,p2,n:longint):longint;

var y,x2:comp;

begin  Y:=1; x2:=x;

while p2<>0 do begin

if p2 mod 2<>0 then begin

y:=trunc(y)*x2; y:=trunc(y) mod n;

end;

x2:=x2*x2; x2:=trunc(x2) mod n;

p2:=p2 div 2;

end; vozstep:=trunc(y);

end;

begin   clrscr;

randomize;

Writeln('Шифрование RSA');

Write('Выбираются два простых числа  ');

npoctbIe(P);npoctbIe(Q);

Writeln('P=',p,'     Q=',q);

n:=p*q; m:=(p-1)*(q-1);

Writeln('Вычисляются числа N=P*Q  и  M=(P-1)*(Q-1)');

Writeln('N=',trunc(n),' M=',trunc(m));

Writeln('Выбирается число D, взаимно простое с M');

D:=B3aumHo(M); Writeln('D=',d);

Writeln('Рассчитывается Е');

E:=viE;Writeln('E=',trunc(E));

Writeln('Открытыe ключu D=',D,' и N=',trunc(N),',');

Writeln('3акрытый ключ Е=', trunc(e));

Writeln('Введите сообщение:');

readln(s);

Изм.

Лист

№ докум.

Подпись

Дата

Лист

2

Лабораторная работа №6

Writeln('Шифр:');

for i:=1 to length(s) do begin

si[i]:=0;

si[i]:=vozstep(ord(s[i]),D,trunc(n));

Write(si[i]);

end;writeln; Writeln('Расшифровка:');

for i:=1 to length(s) do

Write(chr(vozstep(si[i],trunc(E),trunc(n))));

readln;

end.

Изм.

Лист

№ докум.

Подпись

Дата

Лист

3

Лабораторная работа №6

 

Вывод: научился составлять программы шифрования текста, основываясь на алгоритме RSA.


 

А также другие работы, которые могут Вас заинтересовать

72280. ЗАЩИТА ОТ ОШИБОК И ИНТЕРПОЛЯЦИЯ ПОТЕРЬ ПАКЕТОВ В НИЗКОСКОРОСТНЫХ РЕЧЕВЫХ КОДЕКАХ. ТЕХНОЛОГИЯ MIMO В СИСТЕМАХ LTE 3.51 MB
  Типовой вокодер состоит из кодера (анализатора) и декодера (синтезатора) речевого сигнала. В реальной системе ЦРС декодер разделен с кодером цифровым каналом связи, в котором могут возникать ошибки. Обработка речи ведется, как правило, по кадрам фиксированной длительности с формированием...
72281. Основные требования системы качества - QoS 34.13 KB
  Все более актуальным становится корпоративное использование Интернета для удаленного доступа к данным, информационного поиска, обмена электронными сообщениями и других применений. Сервис-провайдеры отмечают огромный потенциал Интернета при работе с корпоративными клиентами, который еще не реализован.
72282. Синдром эмоционального выгорания 374.22 KB
  В современном обществе меняется отношение людей к работе. Люди теряют уверенность в стабильности своего социального и материального положения, в гарантированности рабочего места. Обостряется конкуренция за престижную и высокооплачиваемую работу.
72283. Генетична соціологія М.Грушевського 79.5 KB
  На особливу увагу заслуговують соціологічні погляди Грушевського щодо питання виникнення і розвитку української та російської народностей становлення державності в Україні та Росії. В даній контрольній роботі спробуємо розкрити найважливіше значення в розробці української ідей тих положень...
72284. СУЩНОСТЬ, ФУНКЦИИ И ИСТОЧНИКИ ФОРМИРОВАНИЯ ПРИБЫЛИ 128 KB
  Прибыль создает определенные гарантии для дальнейшего существования и развития предприятия. Каждое предприятие прежде чем начать производство продукции определяет каждую прибыль какой доход оно сможет получить.
72285. Полупроводниковые диоды 94 KB
  Выпрямительные диоды классифицируются по мощности. В зависимости от максимально допустимого среднего значения прямого тока различают выпрямительные диоды малой средней и большой мощности. Диоды малой мощности предназначены для выпрямления токов до 300мА диоды средней и большой...
72286. ДЕПОЗИТ ЯК ГОЛОВНЕ ДЖЕРЕЛО ФОРМУВАННЯ БАНКІВСЬКИХ РЕСУРСІВ 316.81 KB
  За останні роки в економіці України відбулися радикальні зміни, обумовлені досягненням Україною політичної та економічної незалежності і переходом до розбудови соціально орієнтованої ринкової економіки, тому сучасні банківські установи пропонують своїм клієнтам широкий набір послуг...
72288. Электронные и квантовые приборы СВЧ 143.42 KB
  Кривая электронной перестройки частоты имеет такой вид: Диапазон частот Частота колебаний ЛОВ зависит от напряжения U0 приложенного между замедляющей системой и катодом. Ширина диапазона электронной перестройки частот характеризуется либо коэффициентом перекрытия диапазона либо относительной...