|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.05.2007, 05:28 | #1 |
Пользователь
Регистрация: 07.05.2007
Сообщений: 12
|
Поиск буквы в слое
Допустим у нас есть текст. И нам необходимо найти в нем все 5 символьные слова
После того как мы их нашли, как организовать удаление из всех слов (уже найденных) буквы "А"? Подскажите пожалуйста алгоритм (если вас не затруднит в виде блок схемы, буду очень признателен) |
10.05.2007, 08:11 | #2 |
Пользователь
Регистрация: 28.03.2007
Сообщений: 67
|
премерно во так
Проблема не в том могут ли машины думать, а в том - делают ли это люди?
B. F. Skinner |
10.05.2007, 12:48 | #3 |
Пользователь
Регистрация: 07.05.2007
Сообщений: 12
|
А можно это воплотить без "pos"?
|
10.05.2007, 13:08 | #4 |
Форумчанин
Регистрация: 03.11.2006
Сообщений: 321
|
Можно рассматривать слово как массив и при помощи цикла удалять символы А. Как вариант делаешь временную строковую переменную и циклом добавляешь туда буквы которые не равны А из слова, а затем (в конце цикла) заменяешь приравниванием искомое слово временным.
|
11.05.2007, 05:19 | #5 |
Пользователь
Регистрация: 07.05.2007
Сообщений: 12
|
Подскажи как реализовать эти варианты более подробною Буду очень признателен и благодарен.
|
11.05.2007, 08:16 | #6 |
Пользователь
Регистрация: 28.03.2007
Сообщений: 67
|
насчет первого варианта с "pos" то там все по схеме должно быть понятно выглядеть там будет ват так :
while x<>0 do begin x:=pos('A', st); if x<>0 then delete(st, x, 1); end; а начет второго с массивом примерно вот так: x:=length(st); for i:=1 to x do if st[i]<>'A' then st1:=st1+st[i]; st:=st1; есле же у тебя текст в несколько строк то st сначало будет ровняться первой строке, затем второй и т.д.
Проблема не в том могут ли машины думать, а в том - делают ли это люди?
B. F. Skinner |
11.05.2007, 11:59 | #7 |
Пользователь
Регистрация: 07.05.2007
Сообщений: 12
|
Возникла еще одна идея поиска слов из 5-букв.
вводим массив, потом задаем цикл i=1,5. Затем b=a(i) (:5) потом присваиваем b=a(i) По-поводу отсутствия буквы s: так же прогоняем массив b(:1)='s' b(2:2)='s' Помогите доразвить идею схемы, пожалуйста. Буду очень благодарен. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Русские буквы в TurboPascal | DartMrakkk | Паскаль, Turbo Pascal, PascalABC.NET | 4 | 10.03.2009 21:51 |
Как открыть в DIV слое | antfrolov | PHP | 4 | 14.07.2008 03:29 |
DEV C++ не читает русские буквы | gumar | Общие вопросы C/C++ | 1 | 21.04.2008 09:53 |
Прописные буквы | Guest_ | Помощь студентам | 6 | 15.12.2007 21:29 |
Изменение первой буквы | Костя | Общие вопросы Delphi | 4 | 28.11.2007 14:31 |