Здравствуйте! Мне нужно написать алгоритм сортировки одномерного массива методом Шелла. Как работает сортировка, я разобрался, но написать ее не могу. Кто знает, как это сделать?

вот мой вариант, но я думаю, что он вас скорее рассмешит. чем будет чем-л полезным, тем не менее,

 
uses
  SysUtils;

var i,k:integer;
m:array[1..10] of real;
const d=5;


begin
for i:=1 to 10 do
begin
 writeln('Type ',i,' element of array');
readln (m[i]);
end;
for k:=1 to 10 do
begin if m[k]>m[k+d] then m[k+d]:=m[k]; 

.

Ты поиском пробовал пользоваться? Тут выкладывалось несколько реализаций сортировки Шелла (включая и сортировку Шелла с шагом Хиббарда), и ссылки на другие реализации тоже были...

если честно, пробовал, не нашел. так бы не писал. щас еще посмотрю.