Сортировка Шелла

[QuadroX]

Задание отсортировать массив чисел сортировкой Шелла.

Требования:

Алгоритм сортировки:

h = 1
while h < n, h = 3*h + 1
while h > 0,
h = h / 3
for k = 1:h, insertion sort a[k:h:n]
end

Еще один алгоритм сортировки на псевдокоде:

Shellsort(list, N)
passes = [log_2 N]
while (passes >= 1) do
increment = 2^passes - 1
for start = 1 to increment do
InsertionSort(list, N, start, increment)
end for
passes = passes - 1
end while

Алгоритм должен вызывать процедуру InsertionSort (сортировка вставками), описанную отдельно от основной процедуры Shellsort. В программе должен быть интерфейс (windows forms). Программа должна работать с файлами.

input.txt содержит целый массив который задает пользователь (до 1000 элементов). Чтение производить пока не конец файла (end of file).

output.txt должен содержать следующее:

1я строка: Отсортированный по возрастанию массив
2я строка: Количество сравнений вариантом 1. (завести счетчик сравнений в процедуре shellsort)
3я строка: Количество сравнений вариантом 2.
4я строка: Количество сравнений простой процедурой Insertion Sort(сортировка вставками) для этого же массива.

1. вариант: Используется последовательность инкрементов Кнутта (Knuth):
1, 4, 13, …. (3^k -1)/2,… k = 1, 2, …
2. вариант: Используется последовательность инкрементов Хиббарда(Hibbard)
1, 3, 7, 15, 31…. 2^k - 1,… k = 1, 2, …

Язык Delphi, VC или VB. Лучше Delphi. Пишите цены и срок для такого задания по времени.

ICQ: 323787261
Email: quadrox@yandex.ru

[QuadroX]

Сам разобрался с задачей. Сделал в VC++ Console. Если попросят сделать интерфейс, то обращусь.