Реализации алгоритмов/Сортировка/Шелла: различия между версиями
Содержимое удалено Содержимое добавлено
→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 ==
|