11746

Использование методов защиты информации в программах

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

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

ЛАБОРАТОРНАЯ РАБОТА № 8. Использование методов защиты информации в программах. Цель работы: освоить на практике методы защиты информации. Ход работы 1. Написать программу которая с использованием криптосистемы RSA шифрут сообщение: Истоpия кpиптогpафии pовесница

Русский

2013-04-10

99 KB

3 чел.

ЛАБОРАТОРНАЯ РАБОТА № 8.

Использование методов защиты информации в программах.

Цель работы: освоить на практике методы защиты информации.

Ход работы

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

«Истоpия кpиптогpафии - pовесница истоpии человеческого языка. Пеpвые кpиптосистемы встpечаются уже в начале нашей эpы. Так, Цезаpь в своей пеpеписке использовал уже более менее систематический шифp, получивший его имя.

Буpное pазвитие кpиптогpафические системы получили в годы пеpвой и втоpой миpовых войн. Начиная с послевоенного вpемени и по нынешний день появление вычислительных сpедств ускоpило pазpаботку и совеpшенствование кpиптогpафических методов.

Почему пpоблема использования кpиптогpафических методов в настоящий момент особенно актуальна?

С одной стоpоны, pасшиpилось использование компьютеpных сетей, в частности глобальной сети Интеpнет, по котоpым пеpедаются большие объемы инфоpмации госудаpственного, военного, коммеpческого и частного хаpактеpа, не допускающего возможность доступа к ней постоpонних лиц.

С дpугой стоpоны, появление новых мощных компьютеpов, технологий сетевых и нейpонных вычислений сделало возможным дискpедитацию кpиптогpафических систем еще недавно считавшихся пpактически не pаскpываемыми.»

2.Листинг программы:

var

 Form16: TForm16;

implementation

uses math;

{$R *.dfm}

//Значение бита в двойном слове (32бита)

function Bit(Value, n: Integer): Boolean;

asm

  bt eax, edx

  setc al

  and eax, 0FFh

end;

//Функция быcтрого возведения в степень

function FastPower(a, b, n: integer): integer;

var i: integer;

   ai: extended;

begin

 ai := a;

 for I := Trunc(log2(b)) - 1 downto 0 do

 if Bit(b, i) then ai := Round(sqr(ai) * a) mod n else ai := Round(sqr(ai)) mod n;

 result := Round(ai);

end;

function Encrypt(s: string; e, n: integer): TIncodeMes;

 var I: Integer;

begin

 SetLength(result, length(s));

 for I := 0 to Length(s) - 1 do

   result[i] := FastPower(ord(s[i + 1]), e, n)

end;

function Decrypt(s: array of integer; e, n: integer): string;

 var i: Integer;

begin

 SetLength(Result, Length(s));

 for I := 0 to Length(s) - 1 do

   result[i + 1] := chr(FastPower(s[i], e, n))

end;

//Шифрование текста в Memo

procedure TForm16.Button1Click(Sender: TObject);

 var i, n, e: Integer;

begin

 n := StrToIntDef(Edit3.Text, 697);

 e := StrToIntDef(Edit2.Text, 7);

 FMes := Encrypt(Memo1.Lines.Text, e, n);

 for i := 0 to High(FMes) do Memo2.Lines.Append(IntToStr(FMes[i]));

end;

//Дешифровка сообщения

procedure TForm16.Button2Click(Sender: TObject);

 var i, n, d: integer;

     s : string;

begin

 d := StrToIntDef(Edit1.Text, 183);

 n := StrToIntDef(Edit3.Text, 697);

 s := Decrypt(FMes,d , n);

 Memo3.Lines.Add(s) end;

3. Зашифрованный текст.

680

21

62

98

408

498

530

442

501

429

498

530

188

98

408

626

498

317

405

530

530

501

394

501

498

408

197

151

62

50

530

287

317

501

530

62

98

408

498

530

530

501

206

151

6

408

197

151

206

151

62

429

408

626

408

501

442

294

225

429

317

143

501

538

151

498

197

225

151

501

429

498

530

188

98

408

62

530

62

98

151

433

225

501

197

62

98

498

151

206

317

84

98

62

442

501

27

359

151

501

197

501

50

317

206

317

6

151

501

50

317

5

151

466

501

263

498

225

143

501

184

317

429

260

501

73

151

294

317

498

193

501

197

501

62

197

408

151

466

501

188

151

498

151

188

530

62

429

151

501

530

62

188

408

6

193

294

408

197

317

6

501

27

359

151

501

336

408

6

151

151

501

433

151

50

151

151

501

62

530

62

98

151

433

317

98

530

206

151

62

429

530

466

501

5

530

405

498

260

501

188

408

6

27

206

530

197

5

530

466

501

151

626

408

501

530

433

442

143

501

395

141

388

27

498

50

408

151

501

498

317

294

197

530

98

530

151

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

151

501

62

530

62

98

151

433

225

501

188

408

6

27

206

530

6

530

501

197

501

626

408

250

225

501

188

151

498

197

408

466

501

530

501

197

98

408

498

408

466

501

433

530

498

408

197

225

573

501

197

408

466

50

143

501

205

317

206

530

50

317

442

501

62

501

188

408

62

6

151

197

408

151

50

50

408

626

408

501

197

498

151

433

151

50

530

501

530

501

188

408

501

50

225

50

151

5

50

530

466

501

250

151

50

193

501

188

408

442

197

6

151

50

530

151

501

197

225

206

530

62

6

530

98

151

6

193

50

225

573

501

62

498

151

250

62

98

197

501

27

62

429

408

498

530

6

408

501

498

317

294

498

317

336

408

98

429

27

501

530

501

62

408

197

151

498

5

151

50

62

98

197

408

197

317

50

530

151

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

433

151

98

408

250

408

197

143

501

395

141

538

408

206

151

433

27

501

188

498

408

336

6

151

433

317

501

530

62

188

408

6

193

294

408

197

317

50

530

442

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

433

151

98

408

250

408

197

501

197

501

50

317

62

98

408

442

547

530

466

501

433

408

433

151

50

98

501

408

62

408

336

151

50

50

408

501

317

429

98

27

317

6

193

50

317

585

501

395

141

435

501

408

250

50

408

466

501

62

98

408

498

408

50

225

260

501

498

317

62

5

530

498

530

6

408

62

193

501

530

62

188

408

6

193

294

408

197

317

50

530

151

501

429

408

433

188

193

84

98

151

498

50

225

573

501

62

151

98

151

466

260

501

197

501

206

317

62

98

50

408

62

98

530

501

626

6

408

336

317

6

193

50

408

466

501

62

151

98

530

501

21

50

98

151

498

50

151

98

260

501

188

408

501

429

408

98

408

498

225

433

501

188

151

498

151

250

317

84

98

62

442

501

336

408

6

193

5

530

151

501

408

336

517

151

433

225

501

530

50

405

408

498

433

317

287

530

530

501

626

408

62

27

250

317

498

62

98

197

151

50

50

408

626

408

260

501

197

408

151

50

50

408

626

408

260

501

429

408

433

433

151

498

206

151

62

429

408

626

408

501

530

501

206

317

62

98

50

408

626

408

501

573

317

498

317

429

98

151

498

317

260

501

50

151

501

250

408

188

27

62

429

317

84

547

151

626

408

501

197

408

294

433

408

359

50

408

62

98

193

501

250

408

62

98

27

188

317

501

429

501

50

151

466

501

188

408

62

98

408

498

408

50

50

530

573

501

6

530

287

143

501

395

141

435

501

250

498

27

626

408

466

501

62

98

408

498

408

50

225

260

501

188

408

442

197

6

151

50

530

151

501

50

408

197

225

573

501

433

408

547

50

225

573

501

429

408

433

188

193

84

98

151

498

408

197

260

501

98

151

573

50

408

6

408

626

530

466

501

62

151

98

151

197

225

573

501

530

501

50

151

466

498

408

50

50

225

573

501

197

225

206

530

62

6

151

50

530

466

501

62

250

151

6

317

6

408

501

197

408

294

433

408

359

50

225

433

501

250

530

62

429

498

151

250

530

98

317

287

530

84

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

62

530

62

98

151

433

501

151

547

151

501

50

151

250

317

197

50

408

501

62

206

530

98

317

197

5

530

573

62

442

501

188

498

317

429

98

530

206

151

62

429

530

501

50

151

501

498

317

62

429

498

225

197

317

151

433

225

433

530

143

680

501

395

141

395

141

4.

Вывод: Освоили на практике методы защиты информации.

ЛАБОРАТОРНАЯ РАБОТА № 8.

ИСПОЛЬЗОВАНИЕ МЕТОДОВ ЗАЩИТЫ ИНФОРМАЦИИ В ПРОГРАММАХ.

Цель работы: освоить на практике методы защиты информации.

Выполнил: Большаков В.В.

Группа: 103-ПО.

Дата: 05.12.12.

Проверила: Кашталинская И. А.

Ход работы

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

«Истоpия кpиптогpафии - pовесница истоpии человеческого языка. Пеpвые кpиптосистемы встpечаются уже в начале нашей эpы. Так, Цезаpь в своей пеpеписке использовал уже более менее систематический шифp, получивший его имя.

Буpное pазвитие кpиптогpафические системы получили в годы пеpвой и втоpой миpовых войн. Начиная с послевоенного вpемени и по нынешний день появление вычислительных сpедств ускоpило pазpаботку и совеpшенствование кpиптогpафических методов.

Почему пpоблема использования кpиптогpафических методов в настоящий момент особенно актуальна?

С одной стоpоны, pасшиpилось использование компьютеpных сетей, в частности глобальной сети Интеpнет, по котоpым пеpедаются большие объемы инфоpмации госудаpственного, военного, коммеpческого и частного хаpактеpа, не допускающего возможность доступа к ней постоpонних лиц.

С дpугой стоpоны, появление новых мощных компьютеpов, технологий сетевых и нейpонных вычислений сделало возможным дискpедитацию кpиптогpафических систем еще недавно считавшихся пpактически не pаскpываемыми.»

2.Листинг программы:

var

 Form16: TForm16;

implementation

uses math;

{$R *.dfm}

//Значение бита в двойном слове (32бита)

function Bit(Value, n: Integer): Boolean;

asm

  bt eax, edx

  setc al

  and eax, 0FFh

end;

//Функция быcтрого возведения в степень

function FastPower(a, b, n: integer): integer;

var i: integer;

   ai: extended;

begin

 ai := a;

 for I := Trunc(log2(b)) - 1 downto 0 do

 if Bit(b, i) then ai := Round(sqr(ai) * a) mod n else ai := Round(sqr(ai)) mod n;

 result := Round(ai);

end;

function Encrypt(s: string; e, n: integer): TIncodeMes;

 var I: Integer;

begin

 SetLength(result, length(s));

 for I := 0 to Length(s) - 1 do

   result[i] := FastPower(ord(s[i + 1]), e, n)

end;

function Decrypt(s: array of integer; e, n: integer): string;

 var i: Integer;

begin

 SetLength(Result, Length(s));

 for I := 0 to Length(s) - 1 do

   result[i + 1] := chr(FastPower(s[i], e, n))

end;

//Шифрование текста в Memo

procedure TForm16.Button1Click(Sender: TObject);

 var i, n, e: Integer;

begin

 n := StrToIntDef(Edit3.Text, 697);

 e := StrToIntDef(Edit2.Text, 7);

 FMes := Encrypt(Memo1.Lines.Text, e, n);

 for i := 0 to High(FMes) do Memo2.Lines.Append(IntToStr(FMes[i]));

end;

//Дешифровка сообщения

procedure TForm16.Button2Click(Sender: TObject);

 var i, n, d: integer;

     s : string;

begin

 d := StrToIntDef(Edit1.Text, 183);

 n := StrToIntDef(Edit3.Text, 697);

 s := Decrypt(FMes,d , n);

 Memo3.Lines.Add(s) end;

3. Зашифрованный текст.

680

21

62

98

408

498

530

442

501

429

498

530

188

98

408

626

498

317

405

530

530

501

394

501

498

408

197

151

62

50

530

287

317

501

530

62

98

408

498

530

530

501

206

151

6

408

197

151

206

151

62

429

408

626

408

501

442

294

225

429

317

143

501

538

151

498

197

225

151

501

429

498

530

188

98

408

62

530

62

98

151

433

225

501

197

62

98

498

151

206

317

84

98

62

442

501

27

359

151

501

197

501

50

317

206

317

6

151

501

50

317

5

151

466

501

263

498

225

143

501

184

317

429

260

501

73

151

294

317

498

193

501

197

501

62

197

408

151

466

501

188

151

498

151

188

530

62

429

151

501

530

62

188

408

6

193

294

408

197

317

6

501

27

359

151

501

336

408

6

151

151

501

433

151

50

151

151

501

62

530

62

98

151

433

317

98

530

206

151

62

429

530

466

501

5

530

405

498

260

501

188

408

6

27

206

530

197

5

530

466

501

151

626

408

501

530

433

442

143

501

395

141

388

27

498

50

408

151

501

498

317

294

197

530

98

530

151

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

151

501

62

530

62

98

151

433

225

501

188

408

6

27

206

530

6

530

501

197

501

626

408

250

225

501

188

151

498

197

408

466

501

530

501

197

98

408

498

408

466

501

433

530

498

408

197

225

573

501

197

408

466

50

143

501

205

317

206

530

50

317

442

501

62

501

188

408

62

6

151

197

408

151

50

50

408

626

408

501

197

498

151

433

151

50

530

501

530

501

188

408

501

50

225

50

151

5

50

530

466

501

250

151

50

193

501

188

408

442

197

6

151

50

530

151

501

197

225

206

530

62

6

530

98

151

6

193

50

225

573

501

62

498

151

250

62

98

197

501

27

62

429

408

498

530

6

408

501

498

317

294

498

317

336

408

98

429

27

501

530

501

62

408

197

151

498

5

151

50

62

98

197

408

197

317

50

530

151

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

433

151

98

408

250

408

197

143

501

395

141

538

408

206

151

433

27

501

188

498

408

336

6

151

433

317

501

530

62

188

408

6

193

294

408

197

317

50

530

442

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

433

151

98

408

250

408

197

501

197

501

50

317

62

98

408

442

547

530

466

501

433

408

433

151

50

98

501

408

62

408

336

151

50

50

408

501

317

429

98

27

317

6

193

50

317

585

501

395

141

435

501

408

250

50

408

466

501

62

98

408

498

408

50

225

260

501

498

317

62

5

530

498

530

6

408

62

193

501

530

62

188

408

6

193

294

408

197

317

50

530

151

501

429

408

433

188

193

84

98

151

498

50

225

573

501

62

151

98

151

466

260

501

197

501

206

317

62

98

50

408

62

98

530

501

626

6

408

336

317

6

193

50

408

466

501

62

151

98

530

501

21

50

98

151

498

50

151

98

260

501

188

408

501

429

408

98

408

498

225

433

501

188

151

498

151

250

317

84

98

62

442

501

336

408

6

193

5

530

151

501

408

336

517

151

433

225

501

530

50

405

408

498

433

317

287

530

530

501

626

408

62

27

250

317

498

62

98

197

151

50

50

408

626

408

260

501

197

408

151

50

50

408

626

408

260

501

429

408

433

433

151

498

206

151

62

429

408

626

408

501

530

501

206

317

62

98

50

408

626

408

501

573

317

498

317

429

98

151

498

317

260

501

50

151

501

250

408

188

27

62

429

317

84

547

151

626

408

501

197

408

294

433

408

359

50

408

62

98

193

501

250

408

62

98

27

188

317

501

429

501

50

151

466

501

188

408

62

98

408

498

408

50

50

530

573

501

6

530

287

143

501

395

141

435

501

250

498

27

626

408

466

501

62

98

408

498

408

50

225

260

501

188

408

442

197

6

151

50

530

151

501

50

408

197

225

573

501

433

408

547

50

225

573

501

429

408

433

188

193

84

98

151

498

408

197

260

501

98

151

573

50

408

6

408

626

530

466

501

62

151

98

151

197

225

573

501

530

501

50

151

466

498

408

50

50

225

573

501

197

225

206

530

62

6

151

50

530

466

501

62

250

151

6

317

6

408

501

197

408

294

433

408

359

50

225

433

501

250

530

62

429

498

151

250

530

98

317

287

530

84

501

429

498

530

188

98

408

626

498

317

405

530

206

151

62

429

530

573

501

62

530

62

98

151

433

501

151

547

151

501

50

151

250

317

197

50

408

501

62

206

530

98

317

197

5

530

573

62

442

501

188

498

317

429

98

530

206

151

62

429

530

501

50

151

501

498

317

62

429

498

225

197

317

151

433

225

433

530

143

680

501

395

141

395

141

4.

Вывод: Освоили на практике методы защиты информации.

 


 

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

31357. МЕТОДОЛОГИЯ УПРАВЛЕНИЯ КОРПОРАТИВНЫМИ ИНВЕСТИЦИЯМИ В РЕГИОНЕ (на примере республики Татарстан) 739.5 KB
  Активизация инвестиционного процесса – наиболее актуальная и весьма болезненно решаемая макроэкономическая проблема. Рост объемов инвестиций и подъем экономики в целом ожидался и прогнозировался, начиная с 1993 г., однако выхода из состояния циклического спада не произошло до сих пор
31358. Факторы роста оборотного капитала промышленных предприятий и цена источников его финансирования 3.95 MB
  Оценка финансового состояния предприятия нефтеперерабатывающей отрасли. Финансовый анализ и диагностика предприятия химической отрасли. В начале XXI века в российской экономике действуют наряду с неплатежеспособными предприятиями и вполне благополучные финансово состоятельные хозяйствующие субъекты которые смогли прогрессивно воспринять перемены направленные на многоукладность экономики широкий спектр форм собственности неизбежность опережающего наращивания качества и номенклатуры товаров для широкого потребительского спроса....
31359. Финансово-аналитический аспект реструктуризации задолженности российских предприятий 1.28 MB
  Развитие многих эффективно работающих предприятий блокировано огромными долгами перед федеральным региональными и местными бюджетами эти долги накопленные за последние годы мешают таким предприятиям оплатить счета за сырье и материалы рассчитаться с контрагентами. В общем без решения проблемы долгов бюджету сдвигов в производстве не произойдет ибо не смогут подняться даже предприятия выпускающие высоколиквидную продукцию. Таким образом можно сделать вывод что две вышеуказанные проблемы очень тесно взаимосвязаны и взаимозависимы:...
31360. Глобализация мирохозяйственных связей: сущность, направления, перспективы 626.5 KB
  Проблема глобализации пока еще не нашла полного отражения в трудах экономистов-международников, хотя, справедливости ради, надо сказать, что текущая публицистика изобилует темами, связанными с глобализацией. Появившись в экономических исследованиях в конце 60-х гг., глобальные процессы в разное время с разных точек зрения рассматривались разными авторами, но подходы к осмыслению понятия как такового начали формироваться лишь к концу 90-х гг.
31361. КОРПОРАТИВНОЕ УПРАВЛЕНИЕ ЭФФЕКТИВНОСТЬЮ ФИНАНСОВО-ПРОМЫШЛЕННЫХ ГРУПП (НА ПРИМЕРЕ ФПГ, СОЗДАННЫХ В ТЕКСТИЛЬНОЙ ОТРАСЛИ) 514 KB
  Основной научный результат, полученный в диссертационной работе, заключается в разработке комплекса связанных методик управления, включаемых в цикл корпоративного управления эффективностью функционирования текстильной финансово-промышленной группы и ее технологических цепочек.
31362. ОСНОВЫ МЕТОДОЛОГИИ ПРЕОБРАЗОВАНИЯ РОССИЙСКОЙ СИСТЕМЫ БУХГАЛТЕРСКОГО УЧЕТА К МЕЖДУНАРОДНЫМ СТАНДАРТАМ 602.5 KB
  Данная проблема актуальна и потому, что в период функционирования планово-регулируемой экономики подлинное содержание элементов финансовой отчетности было трансформировано и, по существу, не было востребовано. Отчетность, несмотря на декларируемое требование открытости, была недоступна внешнему пользователю.
31363. МОНИТОРИНГ КОММЕРЧЕСКИХ БАНКОВ В СОВРЕМЕННОЙ РОССИИ 296.5 KB
  Анализ функционирования и взаимодействия этих систем дает основания делать некоторые выводы и позволяет сформулировать основные проблемы, решение которых будет способствовать совершенствованию системы налоговых отношений и контроля, а также позволит повысить результативность применения норм налогового права в части налога на прибыль, взимаемого с коммерческих банков.
31364. Влияние визуальной самоподачи образа «я» на конфликтность субъекта общения 8.86 MB
  На современном этапе развития психологии необходимо получение новых научных знаний о роли семиотических компонентов внешнего облика в возникновении и развитии межличностных конфликтов, выявление тех особенностей самоподачи субъекта, которые являются «конфликтогенными». Изучение проблемы не только углубит общенаучное понимание механизмов возникновения конфликтности, но и позволит осуществлять профилактику, коррекцию и поиск путей конструктивного разрешения конфликтов на невербальном уровне, подойти по новому к поиску путей коррекции лиц с повышенной конфликтностью.
31365. Процесс глобализации и национальная экономика 1.18 MB
  Влияние глобализации на позицию страны в системе мирохозяйственных связей. Место страны в системе мирохозяйственных связей: концептуальные положения. Глобальная конкурентоспособность страны: концептуальные основы. Цикл жизнедеятельности страны как концептуальная основа анализа ее глобальной конкурентоспособности.