![]() |
![]() ![]() |
![]() |
ProtasSoft |
![]()
Сообщение
#1
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
Коллеги, есть ли какие-нибудь исходники по обработке текстовых файлов.
Обработка блоков тестков разделенных набором символов. Поиск слов (словосочетаний) в этих блоках. Подсчет частоты встречаемости. Работа с лексемами и т.д. Жду Ваших предложений ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Здесь посмотри, кое-что было: Частотный словарь
Если нужно нечто более серьезное - уточняй, что именно... |
ProtasSoft |
![]()
Сообщение
#3
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
Есть текстовый файл с текстом, состоящием из отдельных блоков, разделенных набором символов, например следующей последовательностью: **??**.
Необходимо составить словарь (список в отдельном текстовом файле) слов и словосочетаний (последовательности слов) всего текста и каждого блока в отдельности с указанием частоты встречаемости. Желательно иметь возможность создания лексем. В частности под механизмом создания лексемы я понимаю мехнизм нахождения в тексте слов, имеющих одинаковую подпоследовательность символов мощности >N и отличающихся от этой подпоследовательности на <<N символов. |
ProtasSoft |
![]()
Сообщение
#4
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
Можно ли скопировать один текстовый файл в другой
следующим образом: procedure create_vocabulary (file1,file2:string); |
volvo |
![]()
Сообщение
#5
|
Гость ![]() |
Нет. Читай здесь: FAQ: Файлы - Копирование файлов
|
ProtasSoft |
![]()
Сообщение
#6
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
все компилируется, но результата нет.
подскажите где проблема program RFP; |
volvo |
![]()
Сообщение
#7
|
Гость ![]() |
Я не знаю, что именно ты задумывал в этой программе, и какие у тебя были файлы данных, но с моими файлами она в 2-х местах входила в бесконечный цикл:
1) в процедуре file_preprocess замени while not eof (f) doна while not seekeof (f) do 2) while j<=i do begin {2}без отмеченной строчки будет выполняться очень долго, так что увеличение j все-таки добавь... ![]() |
ProtasSoft |
![]()
Сообщение
#8
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
После внесения исправлений результирущих файлов по-прежнему нет
![]() |
volvo |
![]()
Сообщение
#9
|
Гость ![]() |
Ну, так что, мы по прежнему должны ДОГАДЫВАТЬСЯ, что именно у тебя хранится в файле данных? Или ты уже научишься, задавая вопрос, присоединять не только (и не столько) программу, но и файл данных? Я же сказал, что с моим файлом все отработало, значит проблема - в твоем DATA.TXT...
|
ProtasSoft |
![]()
Сообщение
#10
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
В качестве содержимого data.txt может быть любой текст, в т.ч. и англоязычный.
Пример: Цитата лkljdfgl;k ждлапждл длвашщ ждлвапджл ждлвапджл оллошгкеш iuretiu 8 jkh 7 jh jh 78 орорпа б.ьцуждчсмшщзг 45 жлчсм 34 opiop43poi poi po poi poipoispo 90,.nxcv87wlkjagrpu9 90908 9098 kj23490sdk;jl8cv -8-09 0-9-09 op;p=-034=-0 'kl;klsfg98908 lkjfg9034... Кроме того, подскажите где посмотреть ASCII коды русских букв. Сообщение отредактировано: ProtasSoft - 27.08.2005 13:36 |
volvo |
![]()
Сообщение
#11
|
Гость ![]() |
И ты хочешь сказать, что при запуске программы с моими исправлениями у тебя нет результирующих файлов (или они пустые?)...
![]() Мне почему-то кажется, что у тебя какая-то проблема с опциями компилятора Прикрепленные файлы ![]() |
ProtasSoft |
![]()
Сообщение
#12
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
Спасибо за inc(j).
Вот, что у меня получилось: program RFP; Теперь у меня проблема с размерностью массива. Не могу его увеличить даже до 8000 - при таком размере комп не выдает результатов. HELP ![]() Прикрепленные файлы ![]() |
volvo |
![]()
Сообщение
#13
|
Гость ![]() |
Цитата Спасибо за inc(j) Я еще в посте №7 сказал, что это надо было сделать... Без этого программа входит в бесконечный цикл...По поводу 8000 элементов: ты наступаешь второй раз - на те же грабли ![]() const из процедуры и сделай этот массив глобальным, у тебя просто не хватает стека, чтобы затолкать в него больше 3-х Мб данных (если массив описан локально)... У меня прекрасно отработало при max_count = 100000;, но на всякий случай счетчики i, j, k я сделал типа LongInt ... |
ProtasSoft |
![]()
Сообщение
#14
|
Новичок ![]() Группа: Пользователи Сообщений: 33 Пол: Мужской Репутация: ![]() ![]() ![]() |
:flowers:
Огромное спасибо за помощь. Следуя Вашим советам, все заработало! |
![]() ![]() |
![]() |
Текстовая версия | 12.09.2024 11:56 |