Реализации алгоритмов/Сортировка/Шелла: различия между версиями

Содержимое удалено Содержимое добавлено
→‎Object Pascal (Delphi): Добавил использование Седжвика
Нет описания правки
Строка 193:
 
== Object Pascal (Delphi) ==
<source lang="pascal">
 
var
incr: array [0..23] of integer = (1, 4, 10, 23, 57, 145, 356, 911, 1968, 4711,
Строка 236:
until not (cur_inc <> -1);
end;
</source>
 
== PHP ==