Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.78/18: Рейтинг темы: голосов - 18, средняя оценка - 4.78
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141

Кодирование

24.03.2010, 21:22. Показов 3668. Ответов 30
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дан алфавит, состоящий из 6 букв: 1=А, 2=Б, 3=Р, 4=М, 5=О, 6=В. Необходимо написать программу с полем для ввода слов, состоящих только из данных букв, сортирующую слова в по данному алфавиту.

Можно вводить неограниченное количество слов, не обязательно эти слова должны существовать, слово - это просто набор букв.

Помогите, пожалуйста!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.03.2010, 21:22
Ответы с готовыми решениями:

Кодирование текста
Как закодировать текст на delphi(типа md5) стандартными средствами?

Кодирование текста
Добрый день! Как можно закодировать txt-файл с использованием кода-ключа?

Бинарное кодирование
Добрый день! Возможно ли на Delphi закодировать файл в бинарном виде, то 0 и 1? Если можно, привидите код.

30
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
25.03.2010, 11:18
Держи исходник Кодирование.rar,подробно закомментировал его.Будут вопросы,или если я что то не так сделал пиши.
1
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
25.03.2010, 15:47  [ТС]
Спасибо огромное! Только надо, чтобы слова можно было вводить, а программа бы их сортировала.
0
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
25.03.2010, 15:52
Ну пиши что хочешь в mmo1 ручками,а программа все сделает, я просто сам пробовал вот текст в mmo1 и оставила так вводи пожалуйста,воообще куда хочешь только сдесь
if Correct(Trim(mmo1.Text)) then //корректел ли введенный текст
место mmo1.text укажи откуда взять ему текст для проверки и последующих действий
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
25.03.2010, 16:06  [ТС]
А программка что-то слова не сортирует, она их просто из строки в столбик переставляет в том же порядке. Или как нужно ею пользоваться?
0
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
25.03.2010, 16:23
Извеняюсь,чет заморочился я,не так чуток сделал
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
25.03.2010, 20:27  [ТС]
Доделай, пожалуйста))) Сама я сделать не смогу(((
0
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
25.03.2010, 21:17
Конечно,завтра все будет готово )) извени за столь долгий строк
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
26.03.2010, 20:26  [ТС]
Извини за беспокойство. Долгий срок - это было бы ничё, если б завтра сдавать не надо было.
0
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
26.03.2010, 21:00
Ууупс,ладно щас буду трассировать программу.

Добавлено через 27 минут
Извени щас ооч занят,и башка не варит,прям ужас,щас парней приглашу тебе помоч.Но если что то хотябы у тебя уже что то есть,там все ПОЧТИ работает нормально.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
26.03.2010, 23:08
Вот немного переделал программу от strateg0793,
Вложения
Тип файла: rar Копия Кодирование.rar (174.3 Кб, 33 просмотров)
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
27.03.2010, 16:42  [ТС]
Ну, да. Почти нормально работает, но желательно, чтоб всё верно работало. Может, заполить ато. Извини за настойчивость, обратиться больше некуда. Посмотри, пожалуйста, сегодня - завтра.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.03.2010, 16:45
Цитата Сообщение от Prelest) Посмотреть сообщение
но желательно, чтоб всё верно работало.
В смысле? Все работает так, как Вы написали в задании. Вводите слово из этих букв, программа выводит его по заданному алфавиту.
0
 Аватар для STRATEG
1174 / 480 / 83
Регистрация: 04.03.2010
Сообщений: 1,019
27.03.2010, 16:45
ОК,спс за время)) а то куча проектов висит,если начнут пресовать еще одними дипресняк будет сделаем до завтра,тебе когда сдавать?
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
27.03.2010, 16:47  [ТС]
Извиняюсь, не заметила сообщения от Puporev.
Посмотрела программу. Она мне на все вводимые слова "Неверно" отвечает.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.03.2010, 16:50
Цитата Сообщение от Prelest) Посмотреть сообщение
Она мне на все вводимые слова "Неверно" отвечает.
Значит неверно вводите. По условию же все буквы вводятся в верхнем регистре, при чем только разрешенные заданием.
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
27.03.2010, 16:54  [ТС]
Да ты что! Не надо никаких депресняков. Ты же не обязан все программы делать. Меня вообще люди здесь удивляют, за спасибо программы пишут. Огромное вам спасибо
Вообще у меня сегодня пара была. Сдавать надо было ещё 2 пары назад. А сегодня я спросила у препода, когда он вообще в университете бывает. Сказал, что в понедельник будет. Вот, желательно к понедельнику сделать. Можно ещё и во вторник.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.03.2010, 16:57
Prelest), Что сделать-то нужно, что Вас конкретно не устраивает в моей программе. Я как прочитал задание, точно так и написал.
0
2 / 2 / 0
Регистрация: 22.03.2010
Сообщений: 141
27.03.2010, 16:58  [ТС]
Я и ввожу в верхнем регистре, причём разрешённые буквы.
Например, я ввела:"РОМ БОР АВОВ". Он мне написал "неверно". Разве неверно?
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
27.03.2010, 17:03
Я то понял что вводится одно слово, сортируется, потом другое, про то что вводится не слово, а строка из слов, про это не написано, тогда уж нужно сортировать слова в строке и определиться с разделителями, это же не обязательно пробел. Про все это в задании ни слова не сказано.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.03.2010, 17:03
Помогаю со студенческими работами здесь

Кодирование+декодирование методами Шеннона-Фано и Хемминга
Требуется сабж на Delphi. Дается файл, который следует закодировать, потом полученный закодированный файл декодируется. Требуются оба...

Кодирование
Мне нужно написать программку, которая будет кодировать предложения с помощью метода LZ78, или похожим методом(LZ77, LZW, LZSS). Прошу...

Кодирование
здравствуйте всем, помогите плз: закодируйте текст,заменяя один символ другим по определенному правилу,+ текст находиться в тестовом...

Кодирование информации
Всем привет! Вот есть программа отчасти не исправная, помогите разобраться в чем у меня ошибка и как ее исправить. Всем буду благодарен за...

кодирование/декодирование
надо написать программу в Делфи.... вот работа программы.... Ввод текста(последовательность символов). программа определяет...


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

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru