ustify">    Dim a, b, c, d, e As Boolean

    Dim k1(12), k2(12), k3(12) As Boolean

      For i = 1 To 12

       w = Worksheets(3).Cells(i + 1, 2).Value

        If w = 1 Then k1(i) = True

        If w = 0 Then k1(i) = False

      Next i

      For i = 1 To 12

       w = Worksheets(3).Cells(i + 1, 3).Value

       If w = 1 Then k2(i) = True

       If w = 0 Then k2(i) = False

      Next i

      For i = 1 To 12

       w = Worksheets(3).Cells(i + 1, 4).Value

       If w = 1 Then k3(i) = True

       If w = 0 Then k3(i) = False

      Next i

                 j = 1

      For i = 1 To Ls

       w = Worksheets(3).Cells(i + 1, 5).Value

       If w = 1 Then e = True

       If w = 0 Then e = False

                If j > 12 Then j = 1

       b = e Xor k3(j)

       c = b Xor k2(j)

       d = c Xor k1(j)

       If d = True Then w = 1

       If d = False Then w = 0

       Worksheets(3).Cells(i + 1, 6).Value = w

                j = j + 1

      Next i

    End Sub 

Примеры: 

 
 

Вывод: Я научилась программировать потоковое блочное шифрование с симметричным ключом на примере приложения Microsoft Excel. 
 
 
 
 
 
 
 
 
 
 

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

Шифрование  с помощью пакета PGP Desktop

 

    Цель  работы: научиться работать с программой PGP Desktop 9.5.

    Задание:

1. Установить  программу PGP Desktop 9.5.

2. Создать  открытый и закрытый ключ.

3. Распространить  открытый ключ своему респонденту  и поменяться с ним его открытым  ключом.

4.  Получить открытый ключ респондента  и зашифровать им свое сообщение  и послать   его для расшифровки обратно.

5. Получить  от  респондента сообщение и  расшифровать его.

    Результат работы:

 1.  Для  того чтобы установить программу  была проделана следующая работа:

- разархивирован  инсталляционный файл;

- выбран  язык (английский);

- заполнено лицензионное сообщение;

- выбрана  парольная фраза (Лабораторная  работа);

- заполнены  анкетные данные об организации;

- установлена  директория по умолчанию;

- выбраны  все компоненты для установки;

- перезагружен  компьютер. 

    2.  Был создан открытый (для общего пользования) и закрытый (индивидуальный) ключи (см. рисунок 1).

   

 

   Рисунок 1 – Ключ 

    Получили  ключ со следующими данными (см. рисунок 2): 

    

 

Рисунок 2 – Идентификационные данные ключа 
 

    3. Для того чтобы получить зашифрованную  информацию от Респондента, ему необходимо экспортировать свой ключ, с помощью которого она будет расшифрована.

    Респондент  с помощью ключа зашифровывает  сообщение и посылает его Резиденту:

  

Рисунок 3 – Зашифрованное сообщение от респондента 
 

    После применения своего ключа, был получен текст: 

 

Рисунок 4 – Расшифрованное сообщение от респондента 

    4. Был перехвачен текст, посланный  Респондентом. При попытке его  расшифровать было получено следующее  сообщение: 

 

Рисунок 5 – Попытка расшифровки сообщения  чужим ключом 

    Следовательно, можно сделать вывод о том, что зашифровать сообщение ключом резидента можно, а расшифровать – нет. 
 

    5. Респондент с помощью посланного  ключа Резидента зашифровал ей сообщение: 
 

Рисунок 6 – Исходный текст для резидента 
 

 

Рисунок 7 – Зашифрованный текст для  резидента 

    После того, как сообщение было получено Резидентом , оно было расшифровано. 

    Вывод: в результате лабораторной работы была установлена программа, созданы два ключа -  открытый и закрытый. Были приобретены знания по шифровки и дешифровки сообщений с помощью ключей.