ВУЗ:
Составители:
42
//ТИПЫ ДАННЫХ ДЛЯ ОБРАБОТКИ ТЕКСТА РАЗЛИЧНЫМИ СПОСОБАМИ
{элемент результирующего массива слов }
KeyInfType=record
key :boolean;
delta:real;
end;
ProcessKeyInf=array[1..MaxProc] of KeyInfType;
WordType=record
word :TTreeword;
freq :longint;
rang :longint;
ampl :longint;
id :longint;
textcount:longint;
keyres :ProcessKeyInf;
end;
{массив слов определенной длины}
LenWordMassType = array of WordType;
WordMassType = array[1..MaxLen] of
record
Words :LenWordMassType;
LenMass:integer;
end;
{элемент статистического массива в методе
внутритекстовой фильтрации}
Middletype=record
count :longint;
freqmid:real;
dispers:real;
end;
{статистический массив}
StatistType=array[1..MaxLen] of MiddleType;
{тип-запись для методов межтекстовой фильтрации}
InfWord = record
id :longint;
firsttext:longint;
counttext:longint;
midrang :real;
maxrang :integer;
minrang :integer;
end;
//ТИПЫ ДАННЫХ ДЛЯ ВИЗУАЛИЗАЦИИ КЛЮЧЕВЫХ СЛОВ
{элемент массива ключевых слов для просмотра результатов}
KeyWordType=record
id :longint;
Word :TTreeWord;
Freq :real;
FreqLen :integer;
delta :real;
kernel :shortint;
firsttext:longint;
len :byte;
end;
{массив ключевых слов}
TableWord=array of KeyWordtype;
//ТИПЫ ДАННЫХ ДЛЯ ОБРАБОТКИ ТЕКСТА РАЗЛИЧНЫМИ СПОСОБАМИ {элемент результирующего массива слов } KeyInfType=record key :boolean; delta:real; end; ProcessKeyInf=array[1..MaxProc] of KeyInfType; WordType=record word :TTreeword; freq :longint; rang :longint; ampl :longint; id :longint; textcount:longint; keyres :ProcessKeyInf; end; {массив слов определенной длины} LenWordMassType = array of WordType; WordMassType = array[1..MaxLen] of record Words :LenWordMassType; LenMass:integer; end; {элемент статистического массива в методе внутритекстовой фильтрации} Middletype=record count :longint; freqmid:real; dispers:real; end; {статистический массив} StatistType=array[1..MaxLen] of MiddleType; {тип-запись для методов межтекстовой фильтрации} InfWord = record id :longint; firsttext:longint; counttext:longint; midrang :real; maxrang :integer; minrang :integer; end; //ТИПЫ ДАННЫХ ДЛЯ ВИЗУАЛИЗАЦИИ КЛЮЧЕВЫХ СЛОВ {элемент массива ключевых слов для просмотра результатов} KeyWordType=record id :longint; Word :TTreeWord; Freq :real; FreqLen :integer; delta :real; kernel :shortint; firsttext:longint; len :byte; end; {массив ключевых слов} TableWord=array of KeyWordtype; 42