Тег «сортировка»

Сортировка вставками на Паскале

Разберем простой алгоритм сортировки методом вставки. Хотя существуют и более эффективные алгоритмы сортировок, этот метод достаточно прост в реализации и не треует оперативной памяти даже под стек.

Program SortByVstavka;
var A: array of Integer;
i, j, key: Integer;
begin
//Заполняем массив A
for i := 0 to Length(A) - 1 do
begin
key := A[i];
j [...]

Ваш отзыв

Cортировка Шелла на Delphi

Процесс нанесения художественной татуировки всегда начинается с выбора рисунка. На сайте ru-tattoo.ru вы сможете выбрать то что вам нужно.
Идея алгоритма сортировки Шелла состоит в сравнении элементов, стоящих не только рядом, но и на расстоянии друг от друга. Таким образом этот алгоритм является сортировкой вставками с предварительными "грубыми" проходами. Приведу пример кода на языке Pascal реализации [...]

Ваш отзыв

Сортировка в качестве курсовой работы по программированию

Сортировка - это один из наиболее сложных для изучения алгоритмов. Вопервых, сортировка - это общая задача многих компьютерных приложений. Практически любой список данных ценнее, когда он отсортирован по какому-либо определенному принципу. Часто требуется, чтобы данные были упорядочены несколькими различными способами. Во-вторых, многие алгоритмы сортировки являются интересными примерами программирования. Они демонстрируют важные методы, такие как частное [...]

Отзывов (6)

Cортировка методом выбора на Delphi

Рассмотрим еще один алгоритм сортировки методом выбора. Исходный код процедуры SelectionSort сортировки массива целых чисел представлен ниже. Алгоритм сотрировки методом выбора являеется более эффективным, чем алгоритм сортировки пузырьком.

procedure SelectionSort(var A: array of Integer);
var
I, J, T: Integer;
begin
for I := Low(A) to High(A) - 1 do
for J := High(A) [...]

Ваш отзыв

Сотрировка пузырьком на Delphi

Рассмотрим реализацию алгоритма сортировки пузырьком на Delphi. Функция BubbleSort берет в качестве переммной динамический массив целых чисел и изменяет его, сортируя в нем элементы по возрастанию:

procedure BubbleSort(var A: array of Integer);
var
I, J, T: Integer;
begin
for I := High(A) downto Low(A) do
for J := Low(A) to High(A) - 1 [...]

Ваш отзыв