Шифрование, Заканчиваем 11 класс, а тут программирование совсем сложным стало... П |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Шифрование, Заканчиваем 11 класс, а тут программирование совсем сложным стало... П |
Black Zi |
Сообщение
#1
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Зи Репутация: 0 |
1. Создать программу шифровщик-дишифровщик. Вначале выбераем шифровку или дишифровку выполняем. Для шифровки вводим русский текст, преобразуем все буквы в заглавные, а затем прибавляем каждому коду буквы сдвиг (сдвиг может быть и отрицательным, мы сами его вводим). А на дишифровщике точно на оборот... Заранее благодарю!!!
|
Tan |
Сообщение
#2
|
Профи Группа: Пользователи Сообщений: 559 Пол: Мужской Реальное имя: Бруно Репутация: 10 |
Ну вот вроде шифровка так выглядит, если я правильно понял ( или с русскими по другому? ), для любых сиволов. Это только шифровка обратный процесс аналогичен:
uses crt; Сообщение отредактировано: Tan - -------------------- Цитата Imagination is more important than knowledge. Albert Einstein |
klem4 |
Сообщение
#3
|
|||
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Tan, и что выдаст твоя программа для строки ab при n = -4 ? Пользуемся поиском, задача решалась ! -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
|||
Tan |
Сообщение
#4
|
Профи Группа: Пользователи Сообщений: 559 Пол: Мужской Реальное имя: Бруно Репутация: 10 |
Границы смещения я и не ставил, если ты про это конечно, если человек понял идею для него это не проблема.
-------------------- Цитата Imagination is more important than knowledge. Albert Einstein |
klem4 |
Сообщение
#5
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Да что ты ! А что-же у тебя в программе знначат вот эти строки ?
writeln ('Vvedite velichinu smeshenija? '); ? + Смотрел какой результат UpCase дает для кириллицы ? А ведь именно с ней надо работать по заданию. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
compiler |
Сообщение
#6
|
Человек Группа: Пользователи Сообщений: 1 050 Пол: Мужской Реальное имя: Станислав Репутация: 3 |
Если тема не будет переименована, она будет закрыта а пользыватели могут периименовывать темы? Мы простые смертные на это к сожелению не способны... -------------------- Спасибо!
Удачи! |
Артемий |
Сообщение
#7
|
Помощник капитана Группа: Пользователи Сообщений: 601 Пол: Мужской Реальное имя: Артем Репутация: 2 |
{$X+} Вот подкидываю с кириллицей.. -------------------- Dum spiro spero!
|
Алена |
Сообщение
#8
|
Гость |
Шифрование текста (метод Цезаря)
|
Black Zi |
Сообщение
#9
|
Группа: Пользователи Сообщений: 2 Пол: Мужской Реальное имя: Зи Репутация: 0 |
Ребят, век не забудем... Я пока не проверял, но выгледит красиво. Надеюсь машине тоже понравится... А переименовать почему-то не могу тему. Мож потому что я с мини оперы сдеся...
|
klem4 |
Сообщение
#10
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Мне кажется просто Цезарь это не совсем то что нужно, я думаю должно быть что-то вроде этого:
const -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 7.10.2024 2:44 |