 Задача на строки, Подскажите алгоритм... |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| -=Domestos=- |
 17.02.2007 18:08
Сообщение
#1
|
 Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: Алексей Репутация:  0   |
Задача такая:
Вводится произвольный текст в строку. Вывести слова из строки, которые не повторяются. Под словом считать набор символов, разделенный от другого одним или несколькими пробелами. Т.е. если строка "сын мама папа мама", вы вывести прога должна "сын" и "папа"... Я делаю так - вводится текст, записывается в строку S, далее в цикле ищу слово, сохраняю его в Slovo, а оставшуюся строку сохраняю в S1. Проверяю, если pos(Slovo,S1)=0 - вывожу слово, иначе - новая итерация. В результате выводится полнейший бред... Помогите, пжлст! В понедельник надо показать задачу... |
   |
 
|
Сообщений в этой теме
-=Domestos=- Задача на строки 17.02.2007 18:08
volvo Алгоритм рабочий (за исключением некоторых мелочей... 17.02.2007 18:12 -=Domestos=- Вот текст проги:
program stroki;
uses CRT;
var ... 17.02.2007 18:38 volvo Во-первых, ты изменяешь параметр цикла внутри само... 17.02.2007 18:47 -=Domestos=-
Параметр цикла меняю только в части программы, ко... 17.02.2007 22:55 volvo Да? У меня она даже не компилировалась, и тебе не ... 17.02.2007 23:11 -=Domestos=- Теперь идеально работает! Спасибо!
А с изм... 18.02.2007 11:42
мисс_граффити от компилятора зависит...
но даже если пропускает ... 18.02.2007 14:55  |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 14:16 |