="justify"> then
begin : = L;// Result: = -1 есліпоіскточний
Exit;
end ;: = (L + R) div < span align = "justify"> 2;
if A [M] = X then
begin : = M;;
end ;
if A [M]> X then : = RecurceFind (L, M - 1)
else : = RecurceFind (M + 1, R)
end ;
begin : = RecurceFind (Low (A), High (A));
end ;
Вибір алгоритму двійкового пошуку обумовлений простотою і швидкодією в порівнянні з наведеним вище алгоритмом лінійного пошуку.
2. Опис використаних структур даних
Масив - упорядкований набір даних, для зберігання даних одного типу, ідентифікованих за допомогою одного або декількох індексів. У простому випадку масив має постійну довжину і зберігає одиниці даних одного і того ж типу. p align="justify"> Кількість використовуваних індексів масиву може бути різним. Масиви з одним індексом називають одновимірними, з двома - двовимірними і т.д. Одновимірний масив нестрого відповідає вектору в математиці, двовимірний - матриці. br/>В
Рис. 2.1. Схематичне зображення двовимірного масиву
У додатку масив використовується для зберігання словосполучень і частоти їх повторень у тексті. Кожному елементу в масиві відповідає деякий словосполучення. У процесі підрахунку та видалення повторюваних словосполучень в кожен елемент масиву додається кількість повторень відповідного словосполучення. Вибір масиву рядків в якості структури даних для зберігання словника обумовлений простотою використання. br/>
3. Опис процедур і функцій procedureTForm1. Button1Click (Sender: TObject)
Дана процедура дозволяє вибрати файл для роботи з файлової системи Windows. При цьому відкривається діалогове вікно з каталогом. Робиться це за допомогою змінної типу TOpenDialog . Властивість Filter дозволило створити обмеження на відкриття файлів. Програма відкриває тільки файли з расшіреніем.txtі.rtf. Шлях до вибраного файлу записується в глобальну змінну <...
