String, нужна помощь. - Помощь студентам

Asentian · 12.02.2008, 22:25

Помогите пожалуйста, никак не пойму как сделать вот такое:
Дана строка слов, разделённых пробелами.Сформировать новую строку из неповоторяющихся слов, расположив их в алфавитном порядке.

mihali4 · 13.02.2008, 00:51

1. Берем по одной буковке, начиная с первой и составляем постепенно первое слово.
2. Как встретили пробел - все, слово готово. Пишем его в листбох со включенным Sorted.
3. Пропускаем пробел или пробелы и к шагу 1.
4. Когда достигнем конца строки, это будет последнее слово.
5. В листбоксе проверяем последовательно слова, начиная с первого. Если выбранное и следующее равны - удаляем следующее. Если нет - берем следующее слово. И так - до конца листбокса.
6. В результате в листбоксе - отсортированный по алфавиту список неповторяющихся слов.

AlDelta · 13.02.2008, 01:49

http://delphibasics.ru/TStringList.php

12.02.2008, 22:25	#1
Asentian Новичок Джуниор Регистрация: 29.01.2008 Сообщений: 7	Сформировать новую строку из неповоторяющихся слов, расположив их в алфавитном порядке Помогите пожалуйста, никак не пойму как сделать вот такое: Дана строка слов, разделённых пробелами.Сформировать новую строку из неповоторяющихся слов, расположив их в алфавитном порядке. Последний раз редактировалось Stilet; 13.02.2008 в 08:58.

13.02.2008, 01:49	#3
AlDelta Реанимируюсь... Участник клуба Регистрация: 19.07.2007 Сообщений: 1,445	http://delphibasics.ru/TStringList.php Пишите код так, как будто сопровождать его будет склонный к насилию психопат, который знает, где вы живёте. Правила форума => Правила раздела => Для общего развития => Помощь студентам => Перед тем, как создавать тему, скачайте себе... P.S.: форум не песочница (с) название статьи на сайте MS: "Отмена принудительного отключения автоматического запуска в реестре Windows"

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Нужна помощь...	PAWLO1993	Помощь студентам	1	05.06.2008 00:30
нужна помощь	Селезнёв	Microsoft Office Excel	1	02.03.2007 03:19
Нужна помощь!	Teodor_Bagwell	Общие вопросы Delphi	6	11.02.2007 16:45

13.02.2008, 00:51	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	1. Берем по одной буковке, начиная с первой и составляем постепенно первое слово. 2. Как встретили пробел - все, слово готово. Пишем его в листбох со включенным Sorted. 3. Пропускаем пробел или пробелы и к шагу 1. 4. Когда достигнем конца строки, это будет последнее слово. 5. В листбоксе проверяем последовательно слова, начиная с первого. Если выбранное и следующее равны - удаляем следующее. Если нет - берем следующее слово. И так - до конца листбокса. 6. В результате в листбоксе - отсортированный по алфавиту список неповторяющихся слов.