Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/15: Рейтинг темы: голосов - 15, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 04.10.2016
Сообщений: 1

Xor-шифрование одной строки другой строкой

04.10.2016, 10:59. Показов 3322. Ответов 3

Студворк — интернет-сервис помощи студентам
Доброго времени суток! Нужно написать программу xor шифрования строки другой строкой. Строка, которая будет шифроваться, вводится с клавиатуры, далее вводится ключ. Допустим строка "Привет Мир" и ключ "басков" должно получиться "басковбаск".
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
04.10.2016, 10:59
Ответы с готовыми решениями:

Замена строки одной матрицы строкой другой матрицы
Прошу помощи в ещё одной задаче: Ввести квадратные матрицы X1N×M , X2N×M. Заменить...

Шифрование и дешифрование методами "Парный шифр", "Постолбцовая транспозиция", "XOR-кодирование"
Пожалуйста помогите! Срочно нужны программы шифрования и дешифрования информации методами "Парный...

В двухмерном массиве первую строку поменять местами с последней строкой, вторую строку с предпоследней строкой и так далее.
))=))))))))))))))

3
Модератор
10427 / 5713 / 3404
Регистрация: 17.08.2012
Сообщений: 17,373
04.10.2016, 19:47
Ничего такого получиться не должно. Задание повнимательнее прочитайте.
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
procedure codec(var s: string; key: string);
var i, j: integer;
begin
  if length(key) > 0
    then begin
      j := 1;
      for i := 1 to length(s) do
        begin
          s[i] := char(byte(s[i]) xor byte(key[j]));
          inc(j);
          if j > length(key) then j := 1
        end
    end
    else writeln('Ошибка: нулевая длина ключа.')
end;
 
var str, keystr: string;
begin
  writeln('Введите строку:');
  readln(str);
  writeln('Введите ключ:');
  readln(keystr);
  writeln('Закодированная строка:');
  codec(str, keystr);
  writeln(str);
  writeln('Раскодированная строка:');
  codec(str, keystr);
  writeln(str);
  readln
end.
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
04.10.2016, 22:48
Cyborg Drone,
это было про использование ключа, длина которого меньше, чем шифруемый текст. Тут действительно все как описано ТС.
0
Модератор
10427 / 5713 / 3404
Регистрация: 17.08.2012
Сообщений: 17,373
04.10.2016, 23:54
bormant, ну что тут скажешь, разночтения не в пользу ТС. Ну нигде не написано, что это ключ, преобразованный под длину шифруемой строки. Это мы полагаем, опираясь на наши знания о данном алгоритме шифрования, что это он и есть, а вот из контекста сообщения следует, что это результат работы программы для конкретного набора переменных.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
04.10.2016, 23:54
Помогаю со студенческими работами здесь

Слить две строки, вставив символы одной строки между символами другой строки
Строка a из n символов лексикографически меньше строки b из n символов, если существует такой...

Ввести все элементы массива одной строкой. Вывести каждый элемент массива с новой строки
Дан одномерный массив E, состоящий из 10 вещественных чисел. Ввести все элементы массива одной...

Сформировать новый текст, в котором все такие строки заменены другой заданной строкой
Помогите написать программу для универа.. Задание 5.6. а) Определить количество вхождений в ...

Как работает функция XOR и что она делает?
Как работает функция XOR и что она делает?

Используя операции not, and, or, xor
Используя операции not, and, or, xor записать сложные условия , истиные для следующей ситуации: ...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru