Реализации алгоритмов/Сортировка/Шелла: различия между версиями
Содержимое удалено Содержимое добавлено
Недоработка в алгоритме для Pascal |
|||
Строка 220:
Arr[j+g] := Tmp;
end;
dec(j,
until not ((j>=0) and C);
inc(i
until not (i<=n);
g := g div 2;
|