Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Преобразование рисунка https://www.cyberforum.ru/ delphi-beginners/ thread281083.html
нужна помощь с лабораторной, суть в том что при изменении рисунка мы используем неоднородные и однородные операции, масштаб по КХ 2 по КY 1 поворот на 60 масштаб по КХ 0,5 по КY 1 поворот на -60 и вся картинка рассыпается
Delphi Представить вводимую оператором строку в виде однонаправленного списка символов
ТЕМА:ДИНАМИЧЕСКИЕ ПЕРЕМЕННЫЕ помогите пожалуйста составить текст программы! Представить вводимую оператором строку в виде однонаправленного списка символов.Подсчитать число символов в списке и,если число нечетное,удалитьс имвол,стоящий посередине строки.
Delphi Для целочисленной квадратной матрицы найти число элементов кратных "k" Для целочисленной квадратной матрицы найти число элементов кратных "k" https://www.cyberforum.ru/ delphi-beginners/ thread281066.html Delphi Дана последовательность целых чисел. Сформировать множество четных чисел Дана последовательность целых чисел. Сформировать множество четных чисел Скажите, если кто знает как решить эту задачу = ( https://www.cyberforum.ru/ delphi-beginners/ thread281064.html
Вычислить, используя процедуру P=(2n)!+(3n)! Delphi
Вычислить, используя процедуру P=(2n)!+(3n)! Очень прошу помоч с решением
Delphi Вывести на печать элементы, расположенные после символа "!" https://www.cyberforum.ru/ delphi-beginners/ thread281055.html
Дана строка. Вывести на печать элементы, расположенные после символа "!". (Такой символ в строке единственный)) Помогите пожалуста решить
Delphi Курсовик на Делфи Здравствуйте! Может ли здесь кто-нибудь помочь написать курсовую на Делфи за умеренную плату? https://www.cyberforum.ru/ delphi-beginners/ thread281048.html Массив Delphi
Задача состоит в том, чтобы вывести рандомно массив 5х5 и подсчитать сумму элементов строки и столбца, на пересечении которых находится максимальный элемент... unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm)
Delphi Нужно составить формулу https://www.cyberforum.ru/ delphi-beginners/ thread280889.html
Нужно составить формулу для данного примера
Delphi Ввод, запись и вывод на экран https://www.cyberforum.ru/ delphi-beginners/ thread280867.html
В общем мне нужно заполнить готовую форму данными, при перезапуске программы отобразить данные на другой форме( как регестрация для каждого пользователя)
Delphi listBox
В чем ошибка? procedure TForm1.Button1Click(Sender: TObject); var a:array of integer; i:integer; begin a:=1; a:=1; for i:=3 to 10 do a:=a+a;
Delphi Выполнить поиск вхождений в TStringList Всем привет! Помогите пожалуйста разобраться с вопросом: В TStringList находятся слова, как подсчитать сколько и каких слов там находится? Далее загрузить в StringGrid какое слово и его вхождения (сколько раз оно в TStringList ) https://www.cyberforum.ru/ delphi-beginners/ thread280842.html
912 / 672 / 134
Регистрация: 01.03.2010
Сообщений: 1,273
22.04.2011, 00:50 0

Шифровка-дешифровка - Delphi - Ответ 1575862

22.04.2011, 00:50. Показов 4558. Ответов 11
Метки (Все метки)

Ответ

Dima170792,
Думаю, что при шифровании необходимо формировать ключ, в котором сохраняется последовательность, показывающая сколько знаков отводится очередной букве.
Возьмем слово "пример". Его код 17181014618
п - 17 (2 знака)
р - 18 (2)
и - 10 (2)
м - 14 (2)
е - 6 (1)
р - 18 (2)

ключ будет 222212.

При расшифровке вводится этот ключ и по нему последовательно считывается нужное кол-во цифр, которые затем превращаются в буквы.

Мне кажется, что по другому нельзя. Как программа поймет, что ей считывать? 1 - это а или 17 - это п (в твоем примере)?

Правда, ключ может получиться очень длинным

Есть еще вариант, сделать код для всех знаков 2-х значным. Тогда ключ не понадобиться.
Ставь просто нуль перед однозначным числом. 171810140618

Но это уже будет слабое шифрование. Легко взломать.

Вернуться к обсуждению:
Шифровка-дешифровка Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.04.2011, 00:50
Готовые ответы и решения:

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

Шифровка
Помогите пожалуйста! нужен программный код, ну иди хотя бы метод решение шифровки данных в виде...

Шифрование и дешифровка .ini файла
Здравствуйте уважаемые форумчане. Столкнулся с необходимостью шифровать данные копируемые в .ini...

шифровка данных
подскажите как шифровать\дешифровать данные (конкретно текст нужно), спрашивал на других форумах...

11
22.04.2011, 00:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.04.2011, 00:50
Помогаю со студенческими работами здесь

Шифровка ввода
Скажите, как сделать зашифрованный ввод, то есть например я ввожу 1111 в едит, а оно шифровалось,...

Шифровка ресурсных файлов
Как зашифровать или спрятать в программу ресурсные файлы(у меня это 69 папок и 552 файла объемом...

Шифровка и расшифровка числа
Доброго дня, сделал шифровку числа, а теперь нужно его расшифровать. Как это сделать? var ...

Шифровка/расшифровка текста
Дана такая задача: Чтобы зашифровать текст, записанный с помощью русских букв и знаков, его...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru