 Поиск слов с окончаниями, из файла |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Zloy student |
 29.11.2005 12:44
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 16 Пол: Мужской Реальное имя: Козел настоящий Репутация:  -1   |
Найти слова из текстового файла с окончаниями -онок и -енок и вывести их на экран.Как искать слова по их началу я знаю, а вот как наоборот? Наработки приводить не буду т.к. вам этот бред скорее всего не пригодиться. Заранее спасибо!
|
   |
 
|
  |
Ответов
| Zloy student |
29.11.2005 15:27
Сообщение
#2
|
|
Новичок Группа: Пользователи Сообщений: 16 Пол: Мужской Реальное имя: Козел настоящий Репутация: -1 |
Нужно выводить слова содержащие заглавную букву!
|
|
|
|
Сообщений в этой теме
Zloy student Поиск слов с окончаниями 29.11.2005 12:44
virt pos('енок',s) 29.11.2005 12:56 Zloy student uses crt;
var s:string;
i,n,nah... 29.11.2005 13:07 Ozzя
...
var F: Text;
...
Assign(F, 'name.txt... 29.11.2005 13:16 volvo
А ты этот "вариант" откомпилировать про... 29.11.2005 13:33 Zloy student program a;
var f : text;
s:string;
i,n,nah... 29.11.2005 13:59 Ozzя (s[i+1]=' ') or (i=n)
Условия, разделяемые... 29.11.2005 14:01 volvo Zloy student, я про это и говорил :yes2:
Приорит... 29.11.2005 14:03 Ozzя Zloy student
Ты забыл вставить
ReadLn(F, S);
У теб... 29.11.2005 14:17 Zloy student Спосибо! У меня еще вопрос. Что нужно поменять... 29.11.2005 14:35 Ozzя ...
if s[i] in ['А'..'Я'] then {За... 29.11.2005 14:49 Zloy student Тогда выводятся слова кончающиеся на заглавную. 29.11.2005 15:16 volvo Zloy student,
...
if (copy(StrUpper(s),i-3,4)=... 29.11.2005 15:24 Zloy student А попроще никак нельзя? мне не поверят что это я п... 29.11.2005 15:25 volvo Ну что за народ... Мало того, что даешь решение, т... 29.11.2005 15:34 Zloy student Вот блин! Мне надо понятней выражаться. Забейт... 29.11.2005 15:47
volvo Правила прочти ВНИМАТЕЛЬНО !!! Свалку ... 29.11.2005 15:57 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 20.07.2025 10:27 |