Пример программы с использованием алгоритма бинарного поиска
Program DemoSearch_2;
Uses Crt;
Const
Maximum=100;{максимальное значение элементов массива}
Type
DataType=Integer;
DataIn=array [1..Maximum] of Integer;{пользовательский тип DataIn, который обозначает массив из элементов типа Integer}
Var
WorkArray:DataIn;{объявляем массив типа DataIn}
i:Byte;
{Объявляем функцию Poisk2, у которой 3 формальных параметра:
1-массив, 2-количество элементов массива, 3-ключ поиска}
Function Poisk2(Vx:DataIn;N:Integer;K1:DataType):Integer;
{Poisk2}
Var
L,U,Middle:Integer;
Rez:Boolean;
j:Integer;
begin
L:=1;
U:=N;
Rez:=False;
While (L<=U) and (not Rez) do
begin
{Средний элемент массива}
Middle:=(L+U)div 2;
{если ключ меньше среднего элемента массива, то поиск происходит в правой оставшейся части массива}
If K1<Vx[Middle] then U:=Middle-1
else
If K1>Vx[Middle] then L:=Middle+1
else
Rez:=True;
end;
If Rez=True then Poisk2:=Middle
else
Poisk2:=0;
end;{Poisk2}
{Основная программа}
Begin
ClrScr;
for i:=1 to 10 do
begin
writeln('Введите ',i,'-й элемент массива');
readln(WorkArray[i]);
end;
Case Poisk2(WorkArray,10,6) of
0:Writeln('Такого значения нет')
else
Writeln('Впервые цифра 6 появилась под номером',Poisk2(WorkArray,10,6));
end;
repeat until keypressed;
End.
Порядок выполнения работы
Изучить теоретические сведения по теме “Алгоритм бинарного поиска”.
Получить у преподавателя индивидуальное задание и разработать программу по заданному варианту.
Показать работающую программу преподавателю.
Ответить на контрольные вопросы.
Контрольные вопросы
Основные понятия поиска данных.
Различные методы поиска данных. Краткое описание алгоритмов.
Бинарный поиск. Описание алгоритма и пример программы.
Лабораторная работа № 18
Реализация алгоритмов сортировок включением и выбором при написании программы на Паскале
Цель работы: формирование знаний и умений по изучению методов внутренних сортировок. Приобретение навыков реализации алгоритмов сортировки.
Краткие теоретические сведения
Под сортировкой понимают процесс переупорядочивания некоторого множества объектов с целью их размещения в заданном порядке. Это универсальный вид деятельности с точки зрения обработки данных, которые представляют собой последовательность ключей. С помощью сортировки добиваются такого их размещения, чтобы было выполнено условие:
f(a[1]) f(a[2])f(a[3])… f(a[N]),
где символ означает знак предшествования, а f-некоторая функция упорядочивания. При упорядочивании по возрастанию, после сортировки будет выполнено условие:
a[1]
a[2]
a[3]
. . .
a[N]
В ходе сортировки элементы последовательности меняются местами. Сортировка называется устойчивой, если на этапе замены два одинаковых ключа не меняются местами. Сортировка называется внутренней, если все сортируемые ключи размещаются в оперативной памяти. Если некоторая часть ключей размещается на внешнем носителе, то сортировка называется внешней.
Методы внутренней сортировки
В данных лабораторно-практических работах будут рассмотрены методы, у которых на входе - вектор с произвольным положением ключей, а на выходе - этот же вектор упорядочен по возрастанию.
Существует три группы методов внутренней сортировки (сортировка включением, сортировка выбором, обменная сортировка). В данной лабораторной работе рассмотрены методы сортировки включением и выбором.