алгоритм Левенштейна

[alina1987]

Очень нужна программка, написная на Delphi, точнее нужен текстовй редактор с проверкй правописания, которая основана на алгориме Левенштейна.

Может пригодится:

Проверка правописания. Использование расстояния Левенштейна.

В текстовом файле задан набор слов («словарь»). Считайте, что в словаре записаны все формы слова, поэтому думать о падежах, числах и родах нет необходимости.
Требуется для любого входного документа вывести список слов этого документа, не найденных в словаре. Для каждого такого слова напечатать список предлагаемых вариантов похожих на него корректных слов.
Например, если входной документ содержит фразу:
тарелка стояла на стле,
то программа должна напечатать:
Не найдено: стле. Варианты: стиле, столе, стуле.
Похожесть слов определяется с помощью расстояния Левенштейна. Процедура определения расстояния между входными строками s и t приведена на псевдокоде:
int LevenshteinDistance { char s[1..n], char t[1..m]}
int d[0..n, 0..m];
int i, j, cost;
for i:=0 to n
d[i,0] :=i;
for j:=0 to m
d[0,j] :=j;
for i:=1 to n
for j:=0 to m
if s[i]=t[j] then cost:=0
else cost:=1;
d[i,j]:=minimum(d[i-1,j]*1, // вставка
d[i,j-1]*1, // удаление
d[i-1,j-1]*cost); // замена
return d[n,m];

Алгоритм возвращает количество операций редактирования (вставки, замены или удаления символа), требуемое для получения второй строки из первой. Если расстояние равно нулю, строки равны, единице – похожи, двум и более – непохожи.

ПОМОГИТЕ ПОЖАЛУЙСТА!

[VilAm]

ПОМОГИТЕ ПОЖАЛУЙСТА!

стучи в аську помогу за $