![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() ![]() |
![]() |
Kenzo |
![]() ![]()
Сообщение
#1
|
![]() Группа: Пользователи Сообщений: 6 Пол: Женский Репутация: ![]() ![]() ![]() |
У меня такое задание:
нужно зашифровать сообщения, записывая все слова в предложении наоборот и все буквы в слове также наоборот. Составить программу, зашифровывающую и расшифровывающую любое сообщение составленное таким образом. В программе Pascal я все это сотавила: uses crt; Все прекрасно работает: МАМА МЫЛА РАМУ и наоборот соответственно УМАР АЛЫМ АМАМ Нужно реализовать это в Delphi. Я так понимаю необходимо 3 поля МЕМО - в 1 само сообщение, во 2 - оно зашифровывется, в 3 - расшифровывется. Вот как это сделать, вывести в поле мемо сообщение о расшифровке и дешифровке я не знаю. Подскажите, пожалуста! Сообщение отредактировано: volvo - 6.11.2009 22:31 |
Client |
![]()
Сообщение
#2
|
Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: ![]() ![]() ![]() |
procedure TForm2.Button1Click(Sender: TObject); |
volvo |
![]()
Сообщение
#3
|
Гость ![]() |
uses StrUtils; |
Lena |
![]()
Сообщение
#4
|
Гость ![]() |
Помогите решить эту же задачу только в виде функции
|
![]() ![]() |
![]() |
Текстовая версия | 27.04.2024 16:43 |