Реализации алгоритмов/Сортировка/Шелла: различия между версиями
Содержимое удалено Содержимое добавлено
Perl |
м оформление |
||
Строка 23:
</pre>
== [[w:Си_(язык_программирования)|Cи]] ==
<big><source lang="c">
/* Пример из книги Герберта Шилдта */
void shell(char *items, int count)
Строка 43:
}
}
</source></big>
== [[w:C++|C++]] ==
<big><source lang="cpp">
int increment(long inc[], long size) {
// inc[] массив, в которые заносятся инкременты
Строка 94:
}
</source></big>
== [[w:VBA|VBA]] ==
<big><source lang="vb">
Sub Sort(Mus() As Long)
Dim i As Long, k As Long, Pos As Long
Строка 124:
Loop Until k = 1
End Sub
</source></big>
== [[w:C_Sharp|C#]] ==
<big><source lang="cpp">
void shellSort(ref int[] arr)
{
Строка 148:
}
}
</source></big>
Этот более быстрый
<big><source lang="cpp">
private void shellSort(ref int[] vector)
{
Строка 167:
}
}
</source></big>
== [[w:Java|Java]] ==
<big><source lang="java">
void sort_shell(int[] a){
int i, j, k, h, m=0, b=a.length;
Строка 190:
}
}
</source></big>
== [[w:Delphi_(язык_программирования)|Object Pascal (Delphi)]] ==
<big><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></big>
== [[w:PHP|PHP]] ==
<big><source lang="php">
function ShellSort($elements,$length)
{
Строка 271:
// $SortedElements=shellsort($UnsortedElements,length of list(an integer));
// e.g: $elements=shellsort($elements,10);
</source></big>
== [[w:Python|Python]] ==
<big><source lang="python">
def shellsort(a):
def new_increment(a):
Строка 292:
a[j],a[j - increment] = a[j - increment],a[j]
return a
</source></big>
== [[w:Ruby|Ruby]] ==
<big><source lang="ruby">
n = mass.size - 1
| |||