Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Название темы включает слова - "Помогите", "Спасите", "Срочно"
Название темы не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте >>>правила <<< и заново правильно создайте тему.
 
Опции темы
Старый 19.11.2017, 13:12   #1
pepe1niy
 
Регистрация: 19.11.2017
Сообщений: 4
Репутация: 10
По умолчанию Помогите с шифровкой

Надо проект сделать и программу на писать по Шифру Гронсфельда
Вот как он работает : По своему содержанию этот шифр включает в себя шифр Цезаря и шифр Виженера, однако в шифре Гронсфельда используется числовой ключ. Зашифруем слово “THALAMUS”, используя в качестве ключа число 4123. Вписываем цифры числового ключа по порядку под каждой буквой слова. Цифра под буквой будет указывать на количество позиций, на которые нужно сдвинуть буквы. К примеру вместо Т получится Х и т.д.
T H A L A M U S
4 1 2 3 4 1 2 3
T U V W X Y Z
0 1 2 3 4
В итоге: THALAMUS = XICOENWV

Последний раз редактировалось pepe1niy; 19.11.2017 в 13:14.
pepe1niy вне форума  
Старый 22.11.2017, 00:46   #2
Alexan-Dwer
Форумчанин
 
Аватар для Alexan-Dwer
 
Регистрация: 20.04.2009
Адрес: Россия
Сообщений: 135
Репутация: 23
По умолчанию

Описание дано.

Примерный алгоритм решения:
1. Запрос текста.
2. Запрос ключа.
3. Через цикл от 1 до длина_текста находим код символа текста текущего индекса, прибавляем к нему код символа ключа с индексом = счетчик цикла mod длина_ключа с вычетом 48 (так как: #48 = '0') и далее, переводим результат в символ, который добавляем к результирующей строке. Я правда, не знаю, как там у Вас с допустимым алфавитом, то есть, что можно вводить в качестве текста, только буквы, или еще цифры, а так же, как программа должна реагировать на ввод других символов, и что будет, если Z зашифровать через 1, если A, то тогда при получении кода больше чем 90, нужно из него вычитать 25 (т. к. 90 - 25 = 65, а #65 = 'A'); если у Вас смешанный алфавит, то тут придется делать условие, чтобы подобрать вычитаемое. Но тут уже уточняйте у того, кто дал задание...
4. Вывод результата.

Последний раз редактировалось Alexan-Dwer; 22.11.2017 в 17:53.
Alexan-Dwer вне форума  
Старый 05.12.2017, 17:36   #3
pepe1niy
 
Регистрация: 19.11.2017
Сообщений: 4
Репутация: 10
По умолчанию

Мне именно код нужен, я просто вообще не вдупляю
pepe1niy вне форума  
Старый 05.12.2017, 18:11   #4
Аватар
Модератор
Заслуженный модератор
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Адрес: Северодонецк.ua
Сообщений: 16,805
Репутация: 5909
По умолчанию

Вы не перепутали "помогите" и "сделайте за меня"?

Назовите нормально тему, покажите свои наработки, конкретные вопросы и т.п.
http://www.programmersforum.ru/announcement.php?f=31

Или в раздел Фриланс если вы не хотите ничего делать, а ищете кого-то, кто выполнит ваши задачи за вознаграждение.
__________________
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума  
Закрытая тема



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевод нужен срочно помогите ) в течение 2 часов от Паскаля на Турбо СИ нужно помогите Жанибек Помощь студентам 14 01.04.2015 18:23
Запара с шифровкой=( Wu-Kid Общие вопросы Delphi 8 22.05.2013 10:52
Помогите создать програму для роботы с файлами, пожалуйста помогите нужно очень срочно Сергей Человек Фриланс 3 06.07.2009 19:30
Помогите Помогите Пожалуйста Решить Одну Задачку в Паскале!!! VisTBacK Помощь студентам 6 19.09.2008 13:44




02:41.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru