Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
0 / 0 / 0
Регистрация: 04.06.2020
Сообщений: 30

Одноалфавитный шифр

20.11.2020, 17:54. Показов 1769. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите зашифровать сообщение "Информация первоосновы деятельности людей", используя одноалфавитный шифр со сдвигом на 2 буквы.
На Pascal или на Delphi(на выбор).

Добавлено через 4 часа 23 минуты
Просто зашифровавать без программы
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.11.2020, 17:54
Ответы с готовыми решениями:

Составить программу шифрования и расшифровки в Delphi по соответствующему заданию: шифр Атбаш + шифр Цезеря
Составить программу шифрования и расшифровки в Delphi по соответствующему заданию: шифр Атбаш + шифр Цезеря (одновременно использовать два...

Расшифровать числовой шифр (предположительно шифр простой замены)
Доброго времени суток! Не могу расшифровать такое вот послание: 3632623163626461393766653039373630393861303036663338353761626662 ...

Шифр Полибия. Программа выводит шифр в разной последовательности.
Реализую шифр полибия для русского алфавита. Возникла проблема при выводе шифра. Например при вводе исходного сообщения "ВОВА"...

2
Модератор
10440 / 5729 / 3405
Регистрация: 17.08.2012
Сообщений: 17,438
25.11.2020, 19:02
Может, всё-таки "Информация - первооснова деятельности людей"?

Одноалфавитный шифр со сдвигом - это шифр Цезаря. Только Цезарь сдвигал алфавит на 3 буквы, а у Вас - на 2.

Для удобства я использовал отдельные алфавиты для строчных и прописных букв.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
const
  b: array[1..2] of string[33] =
    ('абвгдеёжзийклмнопрстуфхцчшщъыьэюя',
     'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ');
var
  s: string;
  i, k, p: integer;
begin
  s := 'Информация - первооснова деятельности людей!';
  writeln('Не зашифровано: ', s);
  {шифрование}
  for i := 1 to length(s) do
    for k := 1 to 2 do
      begin
        p := pos(s[i], b[k]);
        if p > 0 then
          begin
            inc(p, 2);
            if p > length(b[k]) then dec(p, length(b[k]));
            s[i] := b[k][p]
          end
      end;
  writeln('   Зашифровано: ', s);
  {расшифровка}
  for i := 1 to length(s) do
    for k := 1 to 2 do
      begin
        p := pos(s[i], b[k]);
        if p > 0 then
          begin
            dec(p, 2);
            if p < 1 then inc(p, length(b[k]));
            s[i] := b[k][p]
          end
      end;
  writeln('  Расшифровано: ', s)
end.
Без программы.

Для понимания процесса, представьте, что алфавит записан по кольцу, поэтому после "я" идёт "а", а перед "а", естественно, будет "я".

При шифровании переставляем каждую букву по алфавиту циклически на 2 буквы вперёд: а-в, б-г, в-д, г-e, д-ё, ..., э-я. ю-a, я-б.
Ваше (неисправленное) зашифрованное сообщение: "Кпцртовшкб сжтдррупрдю ёжбфжнюпруфк наёжл".

При расшифровке переставляем каждую букву по алфавиту циклически не 2 буквы назад: а-ю, б-я, в-а, г-б, ..., ю-ь, я-э.
Естественно, будет получено исходное сообщение: "Информация первоосновы деятельности людей".
0
0 / 0 / 0
Регистрация: 04.06.2020
Сообщений: 30
25.11.2020, 19:15  [ТС]
Спасибо большое)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
25.11.2020, 19:15
Помогаю со студенческими работами здесь

Моноалфавитный шифр (шифр Плейфейера)
Доброго времени суток, нужна Ваша помощь! Используя ключевое слово и шифр Плейфейера, закодировать фразу «КОД ПЛЕЙФЕЙЕРА ОСНОВАН НА...

Шифр Цезаря и шифр Виженера
1. Используя шифр Цезаря расшифруйте слово ЛГПЗРГ. Шифр Цезаря для русского алфавита со сдвигом на три позиции вправо 2. Используя шифр...

Шифр Виженера, шифр Скитала
Я много прочитал информации и захотел реализовать эти шифры на Buider C++, а вот как это сделать. Кому интересно, напишите мне примеры этих...

Шифр многоалфавитной замены (Вижнера) и шифр алфавитной замены
Напишите пожалуйста 2 программы в VB шифр многоалфавитной замены (Вижнера) и шифр алфавитной замены;) ОЧЕНЬ НАДО!!!;((((:(

Шифр
Привет ребят:) Вот смотрите взбрела мне в голову идея ..... В общем задача такова: есть два метода как вы догадались первый метод- это...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru