Текстовый файл |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Текстовый файл |
LeoDaVinci |
24.02.2007 19:56
Сообщение
#1
|
|||
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
Как вывести на экран те строки текстого файла, которые сдержат данное слово?
procedure Vivod(var f:tf);
Сообщение отредактировано: мисс_граффити - 24.02.2007 20:14 |
|||
Bokul |
24.02.2007 20:02
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Сообщение отредактировано: Bokul - 24.02.2007 20:03 -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
klem4 |
24.02.2007 20:07
Сообщение
#3
|
Perl. Just code it! Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Bokul, слово "ром", строка "паром"
... -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Perfez |
24.02.2007 20:13
Сообщение
#4
|
Бывалый Группа: Модераторы Сообщений: 231 Пол: Женский Репутация: 6 |
|
Bokul |
24.02.2007 20:13
Сообщение
#5
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Точно, давно не программировал..
LeoDaVinci, тогда придется разбивать строку на слова и проверить каждое с них на совпадение, хотя это все можно делать параллельно. Такие темы поднимались десятки раз, если не сотни. Поищи по форуму, будут вопросы - задавай, Разбиение на слова. Все способы. - для старта. Добавлено через 1 мин. Цитата А что?Разве POS не сработает? Как раз и сработает, а не надо.. Добавлено через 1 мин. Цитата Как вывести на экран те строки текстого файла, которые сдержат данное слово? Хотя, может это и надо? Нигде речь о словах не идёт.. -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
LeoDaVinci |
24.02.2007 20:17
Сообщение
#6
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
Типы все объявлены, ошибок программа не выдаёт. Файловая переменная связана с файлом.
Вопрос вызывал "кусок", определяющий входит ли данное слово в строку Вставил в программу недостающую часть. Без вывода чего-либо, консоль закрывается :\ readln; в конце есть. Добавлено через 2 мин. Спс за помощь. Буду разбираться. |
Bokul |
24.02.2007 20:22
Сообщение
#7
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Цитата Вставил в программу недостающую часть. Без вывода чего-либо, консоль закрывается :\ Полный код, тестовый файл, вводимое слово.. -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
LeoDaVinci |
24.02.2007 21:40
Сообщение
#8
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
program Project2; |
Bokul |
24.02.2007 21:53
Сообщение
#9
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
-------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
LeoDaVinci |
24.02.2007 22:03
Сообщение
#10
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
Всё что нужно заработало.
Всем спасибо |
Текстовая версия | 7.06.2024 20:52 |