IPB
ЛогинПароль:

> Анализатор текстов, Частотный, семантический анализ текстов
ProtasSoft
сообщение 23.08.2005 16:27
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 33
Пол: Мужской

Репутация: -  0  +


Коллеги, есть ли какие-нибудь исходники по обработке текстовых файлов.
Обработка блоков тестков разделенных набором символов.
Поиск слов (словосочетаний) в этих блоках. Подсчет частоты встречаемости.
Работа с лексемами и т.д.
Жду Ваших предложений unsure.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
volvo
сообщение 26.08.2005 18:31
Сообщение #2


Гость






Я не знаю, что именно ты задумывал в этой программе, и какие у тебя были файлы данных, но с моими файлами она в 2-х местах входила в бесконечный цикл:
1) в процедуре file_preprocess замени
 while not eof (f) do
begin {1}
на
 while not seekeof (f) do
begin {1}

2)
 while j<=i do begin {2}
if bufer[j]<>'' then begin {3}
stroka:=bufer[j];
for k:=1 to i do begin {4}
if stroka=bufer[k] then begin

bufer[k]:='';
inc(schetchik);

end;
write (voc,stroka);write (voc,' -+- ');
write (voc,schetchik); writeln(voc);
end; {4}
end; {3}

inc(j); { <--- !!! Увеличиваем J !!! --- }

end; {2}
без отмеченной строчки будет выполняться очень долго, так что увеличение j все-таки добавь... smile.gif
 К началу страницы 
+ Ответить 

Сообщений в этой теме
ProtasSoft   Анализатор текстов   23.08.2005 16:27
volvo   Здесь посмотри, кое-что было: Частотный словарь Ес...   23.08.2005 16:37
ProtasSoft   Есть текстовый файл с текстом, состоящием из отдел...   23.08.2005 16:58
ProtasSoft   Можно ли скопировать один текстовый файл в другой ...   26.08.2005 13:27
volvo   Нет. Читай здесь: FAQ: Файлы - Копирование файлов   26.08.2005 14:39
ProtasSoft   все компилируется, но результата нет. подскажите г...   26.08.2005 18:02
volvo   Я не знаю, что именно ты задумывал в этой программ...   26.08.2005 18:31
ProtasSoft   После внесения исправлений результирущих файлов по...   27.08.2005 9:38
volvo   Ну, так что, мы по прежнему должны ДОГАДЫВАТЬСЯ, ч...   27.08.2005 11:28
ProtasSoft   В качестве содержимого data.txt может быть любой т...   27.08.2005 13:34
volvo   И ты хочешь сказать, что при запуске программы с м...   27.08.2005 15:01
ProtasSoft   Спасибо за inc(j). Вот, что у меня получилось: pr...   27.08.2005 17:39
volvo   Я еще в посте №7 сказал, что это надо было сделать...   27.08.2005 18:23
ProtasSoft   :flowers: Огромное спасибо за помощь. Следуя Ваши...   30.08.2005 11:15


 Ответить  Открыть новую тему 
2 чел. читают эту тему (гостей: 2, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 9.09.2025 4:08
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"