DMX
Участник
1570
|
| отправлено: 15-11-2002 12:38:00 | |
инфо • правка • ссылка • сообщить модератору |
РГР №1 :
Разработать подпрограмму (процедуру) формирующую частотный словарь для произвольного заданного текста.объясните плиииз чо от меня требуется то, какой ещё частотный словарь помогите плиииз до сдачи меньше 2-ух недель  |
|
| IP |
|
SLAM
Участник
Хе-хе
|
| отправлено: 15-11-2002 13:20:00 | |
инфо • правка • ссылка • сообщить модератору |
Во нашёл:
Допустим
A$ - Исходный текст
B$ - список симвлолв для посчёта их частотностиFor J=1 TO Len(B$)
S$=MID$(B$,J,1)
S=0
For I=1 TO Len(A$)
IF MID$(A$,I,1)=S$ THEN S=S+1
NEXT I
PRINT S$,S
NEXT J ВОТ так! |
|
| IP |
|
DMX
Участник
1570
|
| отправлено: 15-11-2002 16:22:00 | |
инфо • правка • ссылка • сообщить модератору |
To SLAM
ты знаешь разницу между Ку и 6-ой версией ????ладно забей Можешь просто подробно объяснить что от меня требуется привести пример а напишу я её как нить сам .... ну или кто поможет но только для 6-ой версии а не для Q |
|
| IP |
|
СергейAlex
Участник
LICQ-1443 АйсАся-3777
|
| отправлено: 15-11-2002 18:29:00 | |
инфо • правка • ссылка • сообщить модератору |
To DMX
Q, 6-ой, 7-ой.... разница не велика то что написал SLAM почти тоже что и на VB.
а вот правильно ли он понял, что требуется.... хз  |
|
| IP |
|
SparkMan
Участник
1532
|
| отправлено: 15-11-2002 22:49:00 | |
инфо • правка • ссылка • сообщить модератору |
To SLAM
То, что ты написал, это не частотный словарь. Очень похоже на частотный алфавит, но не до конца. Да и работает такой алгоритм ужасно долго при больших размерах A$ и B$.
To DMX
Объясняю популярно:
Частотный словарь - это таблица из двух столбцов. Первый столбец - само слово, второй - это число, равное отношению количества появлений этого слова в тексте к общему количеству слов.
Словами считаются и междометия, и союзы, и предлоги.
Таблицу можно отсортировать по алфавиту для красоты.
Советую делать все в один проход по тексту.
[Сообщение изменил SparkMan 15-11-2002.] |
|
| IP |
|
ElGato
Участник
opportunist-редиска
|
| отправлено: 16-11-2002 00:14:00 | |
инфо • правка • ссылка • сообщить модератору |
code:
t=File.new("dddd")Dictionary=Hash.new
t.eachword {|w| if Dictionary.has_key?(w) then Dictionary[w]+=1 else Dictionary[w]=1}
Dictionary.each {|word| puts word + " " +DIctionary[word] }
|
|
| IP |
|
DMX
Участник
1570
|
| отправлено: 17-11-2002 12:33:00 | |
инфо • правка • ссылка • сообщить модератору |
| короче как я понял помимо формы нужно создать модуль и в нём с помощью функции InStr отлавливать вовторения слов тексте .... но как это сделать я пока не разобрался |
|
| IP |
|
ElGato
Участник
opportunist-редиска
|
| отправлено: 17-11-2002 12:41:00 | |
инфо • правка • ссылка • сообщить модератору |
я бы обошёлся вообще без формы 
ИМХО, тут делать надо так:
пролистывать файл по словам
если слова ещё не было, внести в список (или массив), если уже было, добавить к частоте 1вывод |
|
| IP |
|
DMX
Участник
1570
|
| отправлено: 18-11-2002 11:15:00 | |
инфо • правка • ссылка • сообщить модератору |
ну народ помогите уже!!!!!!!!!!!!
есть идеи что это нужно запихнуть в двумерный массив Jopa (a,b)
где a это кол-во повторений а b это кол-во всех слов,но как это сделать я пока не понял до конца |
|
| IP |
|
DMX
Участник
1570
|
| отправлено: 18-11-2002 13:08:00 | |
инфо • правка • ссылка • сообщить модератору |
| так скока всего слов в тексте я научился считать но как отловить совпадения то??? т.е если есть текст " форум ты были там ты я ходил туда ты " То как сосчитать что в тексте три раза попадалось слово " ты " ???? [Сообщение изменил DMX 18-11-2002.] |
|
| IP |
|
NeoFF
Участник
Вообще-то я просто Neo. Ложки не существует, а вот
|
| отправлено: 18-11-2002 18:30:00 | |
инфо • правка • ссылка • сообщить модератору |
| ... Такую лажу сделать можно везде Я бы писал на Javе. Сегодня вечером попробую на паскале написать. Если получится - пришлю. С виду-то полная лажня, посмотрим, что на деле... |
|
| IP |
|
NeoFF
Участник
Вообще-то я просто Neo. Ложки не существует, а вот
|
|
|
