Реферат: Создание алгоритма для расстановки переносов в словах по правилам русской орфографии
Министерствообразования и науки Российской Федерации
Федеральноеагентство по образованию
Марийскийгосударственный технический университет
Кафедраинформатики и
системногопрограммирования
Курсовая работапо дисциплине «Информатика»
на тему:
Моделированиеиных процессов
вариант №11
Выполнил:студент ИВТ-11
Андреев МаскимАнатольевич
Проверила:старший преподаватель
Кафедры ИиСП ИвановаИ.Н.
Йошкар – Ола
2008
Постановка задачи
Вариант №11
Построить модельрешения задачи автоматического переноса слов по правилам русской орфографии.
Содержание
Введение
1. Теоретическая часть
1.1 Теория
1.2 Описание метода решения
2. Практическая часть
2.1 Алгоритм решения задачи
2.2 Листинг программы
2.3 Тестирование программы
3. Вывод
Список литературы
Введение
В данной курсовойработе показан один из способов использования математических методов длярешения задачи по переносу слов по правилам русской орфографии. Для реализациипоставленной задачи я использовал теоретические сведения из курса информатики,а также полученные ранее знания в области программирования.
Теоретическая часть
1.1 Теория
Для начала определим,какие существуют правила переносов в русской орфографии.
Основнымиправилами являются:
· Припереносе слов нельзя ни оставлять в конце строки, ни переносить на другуюсторону часть слова, не составляющую слога; например, нельзя переносить:просмо-тр, ст-рах
· Нельзяотделять согласную от следующей за ней гласной.
· Нельзяотрывать буквы ъ и ь от предшествующей согласной.
· Нельзяотрывать букву й от предшествующей гласной
· Нельзя оставлять в конце строки или переносить на другую строкуодну букву
· При переносе слов с приставками нельзя разбивать односложнуюприставку, если за приставкой идёт согласный.
· При переносе слов с приставками нельзя оставлять в конце строкипри приставке начальную часть корня, не составляющую слога.
· При переносе сложных слов нельзя оставлять в конце строкиначальную часть второй основы, если эта часть не составляет слога
· Нельзя оставлять в конце строки или переносить в начало следующейдве одинаковые согласные, стоящие между гласными
· Нельзя разбивать переносом односложную часть сложносокращённогослова
1.2 Описание методарешения
Методомрешения данной задачи является алгоритм, в основе которого лежит «каретка», длиной в 4символа. Принцип работы «каретки» следующий: в слове берутся первые 4 символа,подсчитываются гласные и согласные буквы, и, если в данном месте в слове можносделать перенос по правилам, то перенос делается, если же ни одно правило не подходит,то «каретка» сдвигается на один символ и происходит тот же алгоритм проверки, итак до конца слова.
2. Практическая часть
2.1 Алгоритм решениязадачи
Первоначально,для удобства пользователя, предоставим возможность прописать путь к файлу собственноручно.Когда путь к файлу введен пользователь жмет «выполнить».
После этого производятсяследующие расчеты:
а) для начала создадим алгоритм, который будет считатьколичество гласных и согласных букв в слове. Для этого создаем двумерный массив,в котором содержатся все гласные и согласные буквы в первой ячейке, во второйже содержатся цифры «1» и «2», где гласные приравниваем «1», а согласные «2».Далее создаем цикл, который считает символы от начала строки до первогопробела, затем от пробела до пробела, и так до конца строки.
б) создаемцикл, который в каждом слове части по четыре символа проверяет на возможностьпереноса, если между первыми четырьмя символами перенос сделать нельзя, то«каретка» сдвигается на один символ вправо и так далее до конца слова.
в) заключительный этаппрограммы — это вывод текста, в котором сделаны все возможные переносы вотдельный файл. Файл будет иметь прежнее название + ”2.txt”
2.2 Листинг программы
Программа переноса словпо правилам русской орфографии.
Для оптимизации кода,создаем массив “al” .
Сама программа имеетследующий вид:
unitUnit1;
interface
uses
Windows,Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,StdCtrls, ComCtrls, ShellCtrls;
type
TForm1= class(TForm)
Button1:TButton;
Edit1:TEdit;
procedureButton1Click(Sender: TObject);
procedureFormCreate(Sender: TObject);
private
{Private declarations }
public
{Public declarations }
end;
var
Form1:TForm1;
t,tt,t2:string;
f:Tstrings;
r,i,rs,j,q,rc,m,n,l,qw:integer;
al:array[1..66,1..2]of string;
kl:array[1..1000]of integer;
implementation
{$R*.dfm}
procedureTForm1.Button1Click(Sender: TObject);
begin
f:=Tstringlist.create();
f.Loadfromfile(form1.Edit1.Text);
forqw:=0 to f.count-1 do begin
tt:='';
t2:='';
t:=f.strings[qw];
i:=1;
whilet[i]<>'' do
i:=i+1;
r:=i-1;
fori:=1 to r do begin
q:=1;
forj:=1 to 66 do begin
ift[i]=al[j,1] then begin
tt:=tt+al[j,2];
q:=2;
end;
end;
ifq=1 then begin
ift[i]=' ' then begin tt:=tt+'4'; q:=2; end;
ift[i]='-' then begin tt:=tt+'5'; q:=2; end;
ifq=1 then tt:=tt+'6';
end;
end;
//---------------------------
i:=1;
whilei<=r do begin
q:=0;
m:=0;
n:=0;
forj:=0 to 4 do begin
iftt[i+j]='1' then q:=q+1;
if(tt[i+j]='2') and (j<>4) then m:=m+1;
if((tt[i+j]='4')or(tt[i+j]='5')or(tt[i+j]='6')) and (j<>4) then n:=n+1;
end;
if((q+m>=4)and(q>=2)) and
(tt[i+2]<>tt[i+3])and(n=0)and(tt[i+1]+tt[i+2]<>'21')and((t[i+3]<>'ь')and(t[i+3]<>'ъ')) then begin
t2:=t2+t[i]+t[i+1]+'-';
i:=i+1;
endelse begin
t2:=t2+t[i];
end;
i:=i+1;
end;
//---------------------------
f.strings[qw]:=t2;
end;
f.SaveToFile(form1.Edit1.Text+'2.txt');
end;
procedureTForm1.FormCreate(Sender: TObject);
begin
al[1 , 1 ]:='а' ;
al[2 , 1 ]:='б' ;
al[3 , 1 ]:='в' ;
al[4 , 1 ]:='г' ;
al[5 , 1 ]:='д' ;
al[6 , 1 ]:='е' ;
al[7 , 1 ]:='ё' ;
al[8 , 1 ]:='ж' ;
al[9 , 1 ]:='з' ;
al[10 , 1 ]:='и' ;
al[11 , 1 ]:='й' ;
al[12 , 1 ]:='к' ;
al[13 , 1 ]:='л' ;
al[14 , 1 ]:='м' ;
al[15 , 1 ]:='н' ;
al[16 , 1 ]:='о' ;
al[17 , 1 ]:='п' ;
al[18 , 1 ]:='р' ;
al[19 , 1 ]:='с' ;
al[20 , 1 ]:='т' ;
al[21 , 1 ]:='у' ;
al[22 , 1 ]:='ф' ;
al[23 , 1 ]:='х' ;
al[24 , 1 ]:='ц' ;
al[25 , 1 ]:='ч' ;
al[26 , 1 ]:='ш' ;
al[27 , 1 ]:='щ' ;
al[28 , 1 ]:='ъ' ;
al[29 , 1 ]:='ы' ;
al[30 , 1 ]:='ь' ;
al[31 , 1 ]:='э' ;
al[32 , 1 ]:='ю';
al[33 , 1 ]:='я' ;
al[34 , 1 ]:='А' ;
al[35 , 1 ]:='Б' ;
al[36 , 1 ]:='В' ;
al[37 , 1 ]:='Г' ;
al[38 , 1 ]:='Д' ;
al[39 , 1 ]:='Е' ;
al[40 , 1 ]:='Ё' ;
al[41 , 1 ]:='Ж' ;
al[42 , 1 ]:='З' ;
al[43 , 1 ]:='И' ;
al[44 , 1 ]:='Й' ;
al[45 , 1 ]:='К' ;
al[46 , 1 ]:='Л' ;
al[47 , 1 ]:='М' ;
al[48 , 1 ]:='Н' ;
al[49 , 1 ]:='О' ;
al[50 , 1 ]:='П' ;
al[51 , 1 ]:='Р' ;
al[52 , 1 ]:='С' ;
al[53 , 1 ]:='Т' ;
al[54 , 1 ]:='У' ;
al[55 , 1 ]:='Ф' ;
al[56 , 1 ]:='Х' ;
al[57 , 1 ]:='Ц' ;
al[58 , 1 ]:='Ч' ;
al[59 , 1 ]:='Ш';
al[60 , 1 ]:='Щ';
al[61 , 1 ]:='Ъ' ;
al[62 , 1 ]:='Ы' ;
al[63 , 1 ]:='Ь' ;
al[64 , 1 ]:='Э' ;
al[65 , 1 ]:='Ю';
al[66 , 1 ]:='Я' ;
al[1 , 2 ]:='1';
al[2 , 2 ]:='2';
al[3 , 2 ]:='2';
al[4 , 2 ]:='2';
al[5 , 2 ]:='2' ;
al[6 , 2 ]:='1' ;
al[7 , 2 ]:='1' ;
al[8 , 2 ]:='2' ;
al[9 , 2 ]:='2' ;
al[10 , 2 ]:='1' ;
al[11 , 2 ]:='1' ;
al[12 , 2 ]:='2' ;
al[13 , 2 ]:='2' ;
al[14 , 2 ]:='2' ;
al[15 , 2 ]:='2' ;
al[16 , 2 ]:='1' ;
al[17 , 2 ]:='2' ;
al[18 , 2 ]:='2' ;
al[19 , 2 ]:='2' ;
al[20 , 2 ]:='2' ;
al[21 , 2 ]:='1' ;
al[22 , 2 ]:='2' ;
al[23 , 2 ]:='2' ;
al[24 , 2 ]:='2' ;
al[25 , 2 ]:='2' ;
al[26 , 2 ]:='2' ;
al[27 , 2 ]:='2' ;
al[28 , 2 ]:='1' ;
al[29 , 2 ]:='1' ;
al[30 , 2 ]:='1' ;
al[31 , 2 ]:='1' ;
al[32 , 2 ]:='1' ;
al[33 , 2 ]:='1' ;
al[34 , 2 ]:='1';
al[35 , 2 ]:='2';
al[36 , 2 ]:='2';
al[37, 2 ]:='2';
al[38 , 2 ]:='2' ;
al[39 , 2 ]:='1' ;
al[40 , 2 ]:='1' ;
al[41 , 2 ]:='2' ;
al[42 , 2 ]:='2' ;
al[43 , 2 ]:='1' ;
al[44 , 2 ]:='1' ;
al[45 , 2 ]:='2' ;
al[46 , 2 ]:='2' ;
al[47 , 2 ]:='2' ;
al[48 , 2 ]:='2' ;
al[49 , 2 ]:='1' ;
al[50 , 2 ]:='2' ;
al[51 , 2 ]:='2' ;
al[52 , 2 ]:='2' ;
al[53 , 2 ]:='2' ;
al[54 , 2 ]:='1' ;
al[55 , 2 ]:='2' ;
al[56 , 2 ]:='2' ;
al[57 , 2 ]:='2' ;
al[58 , 2 ]:='2' ;
al[59 , 2 ]:='2' ;
al[60 , 2 ]:='2' ;
al[61 , 2 ]:='1' ;
al[62 , 2 ]:='1' ;
al[63 , 2 ]:='1' ;
al[64 , 2 ]:='1' ;
al[65 , 2 ]:='1' ;
al[66 , 2 ]:='1' ;
end;
end.
2.3 Тестирование программы
Задав слова русскогоязыка получаем на выходе слова с расставленными переносами.
/>
/>
Вывод
При выполнении этой курсовой работы, былсоставлен наиболее оптимальный алгоритм для расстановки переносов в словах поправилам русской орфографии. Эта программа необходима всем людям, которыесомневаются, как переносить то или иное слово по слогам.