20961

Шифрування та дешифрування даних за допомогою алгоритмів перестановки (збивання)

Практическая работа

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

У якості інформації використовувати копію файлу з розробленою програмою програма дешифрування інформації повернення початкового вигляду файла; Індивідуальні завдання: Метод спутаної шини Текст програми: DEFINT IN: DEFSTR S RANDOMIZE 231 CLS: LOCATE 1 1 Lot = 5 s = FOR i=1 TO 64:s=sCHR6525RND:NEXT PRINT s; text : sav = s s = FOR i=1 TO 192: s=sCHR255RND: NEXT 'шифрование FOR i = 0 TO Lot sc=MIDss1I3232 l=2^i:sl= : r= FOR j = 1 TO 32 kg=ASCMIDsc j 1 kl=ASCMIDs j 1...

Украинкский

2013-08-01

141.09 KB

2 чел.

Родін С КІТ-39

Практична робота №2-1

“Шифрування та дешифрування даних за допомогою алгоритмів перестановки (збивання)” за курсом “Захист інформації у комп’ютерних системах та мережах”

Ціль: Створення програм для шифрування та дешифрування інформації за допомогою шифрів перестановки

Постановка задачі:

Необхідно розробити і налагодити дві програми:

Програма шифрування інформації з використанням визначених алгоритмів.

У якості інформації використовувати копію файлу з розробленою програмою, програма дешифрування інформації (повернення початкового вигляду файла);

Індивідуальні завдання: Метод “спутаної шини

Текст програми:

DEFINT I-N: DEFSTR S

RANDOMIZE 231

CLS: LOCATE 1, 1

Lot = 5

s$ = ""

FOR i=1 TO 64:s$=s$+CHR$(65+25*RND):NEXT

PRINT s$; " - text": sav = s$

s$ = ""

FOR i=1 TO 192: s$=s$+CHR$(255*RND): NEXT

'---------------------шифрование

FOR i = 0 TO Lot

sc=MID$(ss,1+I*32,32)

l=2^i:sl="": r=""

FOR j = 1 TO 32

kg=ASC(MID$(sc, j, 1))

kl=ASC(MID$(s$, j, 1))

kr=ASC(MID$(s$, j+32,1))

sl = sl+ CHR$(kl XOR kr)

sr = sr+ CHR$(kr XOR kg)

NEXT

s$=sr+RIGHT$(sl,l)+LEFT$(sl,32-l)

 NEXT

'----------------------порча бита

ss=CHR$(ASC(s$) XOR 4)+RIGHT$(s$,63)

'-----------------печать шифровки

FOR i =1 TO 64

k = ASC(MID$(s$, i, 1))

DEF SEG=47114: POKE 2*i-2, k: DEF SEG

NEXT

LOCATE 2, 65: PRINT " - code"

'---------------расшифровывание

FOR i = Lot TO 0 STEP -1

sc=MID$(s$, 1+i*32, 32): l=2^i

s$=RIGHT$ (s$ ,32- l)+MID$ (s$, 33,l)+LEFT$ (s$, 32)

sl = "": sr = ""

 FOR j = 1 TO 32

 kg = ASC(MID$(sc, j, 1))

 kl = ASC(MID$(ss, j, 1))

 kr = ASC(MID$(ss, j+32, 1))

 sl = sl+ CHR$(kl XOR kr XOR kg)

 sr = sr+ CHR$(kr XOR kg)

 NEXT

ss = sl+sr

NEXT

FOR i =1 TO 64

k = ASC(MID$(s$, i, 1))

DEF SEG=47124: POKE 2*i-2,k: DEF SEG

NEXT

LOCATE 3, 65: PRINT " - text"

n = 0

FOR i =1 TO 64

 IF MID$ (s$, i, 1) =MID$(sav, i,1) THEN

 LOCATE 4, i: PRINT "+";: n = n+I

 ELSE

 LOCATE 4, i: PRINT "-";

 END IF

NEXT

LOCATE 6, 1: PRINT 64 - n; "errors"

END

Висновок: cтворив програму для шифрування та дешифрування інформації за допомогою шифрів перестановки


 

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

17479. Организационное обеспечение и пользователи АИС 36.5 KB
  Организационное обеспечение и пользователи АИС В состав организационного обеспечения АИС принято включать структурные подразделения организации осуществляющие управление технологическими процессами и поддержку работоспособности системы а также совокупность док
17480. Некоторые поисковые возможности и характеристики систем Yandex и Rambler 392.5 KB
  Некоторые поисковые возможности и характеристики систем Yandex и Rambler. Стандартный поиск Yandex. Рассмотрим общий вид стандартной поисковой формы Yandex рис. 2.20. 1. Основная поисковая форма. Главный ее элемент строка запроса. При желании можно искать только в результатах пр
17481. Структура и классификация автоматизированных информационных систем 103.5 KB
  Структура и классификация автоматизированных информационных систем Цели изучения темы: общеобразовательная прочное усвоение знаний о составе и структуре АИС; развивающая развитие логического мышления; воспитательная формирование представлений об осн...
17482. АИС. Автоматизированные информационные системы 114 KB
  Введение. Ни одно современное предприятие не обходится без систем сбора и обработки информации. Чем больше стадий производства чем оно сложнее чем больше и разнообразнее спектр производимых продаваемых изделий или предлагаемых услуг тем больше потребность в автомат...
17483. Формати і правила роботи з командами організації циклів і роботи з ланцюгами мікропроцесора i8086 31.55 KB
  Лабораторна робота №6 З дисципліни СПіОС на тему: Формати і правила роботи з командами організації циклів і роботи з ланцюгами мікропроцесора i8086 Мета: Ознайомитись з правилами роботи команд організації циклів і роботи з ланцюгами мікропроцесора i8086. Вивчити осн
17484. Ввід інформації із клавіатури 27.12 KB
  Лабораторна робота №7 З дисципліни СПіОС на тему: Ввід інформації із клавіатури Мета: Ознайомитись з правилами обробки переривань для роботи із клавіатурою. Завдання: Створіть файл у який записано слово пароль. Напишіть програму яка запитує введення па
17485. Вивчення арифметичних команд мікропроцесора i8086 37.37 KB
  Лабораторна робота №2 З дисципліни СПіОС на тему Вивчення арифметичних команд мікропроцесора i8086 Лабораторна робота №2 Мета: Вивчити арифметичні команди мікропроцесора i8086 і правила їх використання. Завдання: Реалізувати можливість введення даних з клавіа...
17486. Вивчення способів адресації даних мікропроцесором i8086 і їх використання при пересиланні даних 47 KB
  Лабораторна робота №1 З дисципліни СП та ОС Мета: Вивчення способів адресації даних мікропроцесором i8086 і їх використання при пересиланні даних. Теоретичні відомості: Мікропроцесор вибирає один з семи режимів адресації за значенням поля режиму команди: регіс
17487. Формати і правила роботи з командами передачі керування, умовних і безумовних переходів, порівняння мікропроцесора i8086 41.09 KB
  Лабораторна робота №5 З дисципліни СПіОС на тему: Формати і правила роботи з командами передачі керування умовних і безумовних переходів порівняння мікропроцесора i8086 Мета: Ознайомитись з правилами роботи команд передачі керування умовних і безумовних пере