 Помогите решить задачку на строки |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| wary |
 19.10.2006 21:34
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 17 Пол: Мужской Репутация:  0   |
Условие: Дана строка символов. Дано слово (например "окно"). Удалить из заданной изначально строки слово "окно"
Алгоритм решения, который я придумал: 1. Определяем как константу слово "окно" (slovo_okno) 2. Вводим произвольную строку (st1) 3. Курабасим в цикле строку (st1) и выявляем в ней слово "окно" 4. Удаляем выявленно слово "окно" 5. Выводим на экран то что осталось от строки (st1) Поскольку я новичок в паскале, немного трудновато с описание п.3 и п.4. Если не трудно подскажите код как их описать, а также замечания по алгоритму. Заранее всем спасибо!  |
   |
 
|
  |
Ответов
| volvo |
19.10.2006 23:18
Сообщение
#2
|
|
Гость |
Цитата Длину ты знаешь, положение тоже нашел. Не забыть проверять только, что найденный кусок текста действительно является словом, а не его частью, ибо на этом ОЧЕНЬ просто погореть:"Я стоял перед окном" Pos найдет, Delete удалит без сомнения... Что получим? |
|
|
|
| Гость |
21.10.2006 13:23
Сообщение
#3
|
|
Гость |
Bokul программка почему-то не работает....а обзывается инвалидом...
|
|
|
|
| Lapp |
21.10.2006 13:43
Сообщение
#4
|
 Уникум Группа: Модераторы Сообщений: 6 823 Пол: Мужской Реальное имя: Лопáрь (Андрей) Репутация: 159 |
Цитата(Гость @ 21.10.2006 14:23)  Bokul программка почему-то не работает....а обзывается инвалидом... Нельзя ли чуть подробнее? На каком этапе ошибка? и само сообщение поточнее. Я прогнал, вроде работает.. Смотри сам: ■ Free Pascal IDE Version 1.0.6 [2005/11/26] ■ Compiler Version 2.0.2 ■ GBD Version GDB 6.2.1 ■ Cygwin "C:\FPC\2.0.2\bin\i386-win32\cygwin1.dll" version 1005.12.0.0 Running "c:\home\home\ak\pas\th\th011\th011.exe " Enter string asdf ghjk zxcvb qwer tyui asdf wert Enter word asdf Result : ghjk zxcvb qwer tyui wert -------------------- я - ветер, я северный холодный ветер
я час расставанья, я год возвращенья домой |
|
|
|
Сообщений в этой теме
wary Помогите решить задачку на строки 19.10.2006 21:34
мисс_граффити ну... при очень большом желании можно и так...
а в... 19.10.2006 23:07
Bokul var s,word:string; b:boolean; buf:byte;
begin
wri... 20.10.2006 1:20 lapp Bokul, у меня под рукой нет компилятора, чтоб пров... 20.10.2006 5:34 volvo Я прогнал, вроде работает..Аналогично - в Turbo Pa... 21.10.2006 13:46
wary Огромное всем спасибо, задача тщательно разобрана ... 22.10.2006 11:10 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 12.08.2025 10:49 |