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

Содержимое удалено Содержимое добавлено
м Ivan Shmakov переименовал страницу Примеры реализации сортировки Шелла в Реализации алгоритмов/Сортировка/Шелла: Согласно [[Викиучебник:…
м Снятие {{К переименованию}} и добавление {{BookCat}}; избыточные <big /> и <font /> вокруг <source />; ссылки; пробелы.
Строка 1:
{{К переименованию | 2014-05-02 | Реализации алгоритмов/Сортировка/Шелла}}
 
{{wikipedia|Сортировка Шелла}}
== Псевдокод ==
Строка 25 ⟶ 23 :
</pre>
 
== [[w:Си_Си (язык_программированияязык программирования)|Cи]] ==
<big><source lang="c">
/* Пример из книги Герберта Шилдта */
void shell(char *items, int count)
Строка 45 ⟶ 43 :
}
}
</source></big>
 
== [[w:C++|C++]] ==
<big><source lang="cpp">
int increment(long inc[], long size) {
// inc[] массив, в который заносятся инкременты
Строка 96 ⟶ 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
Строка 126 ⟶ 124 :
Loop Until k = 1
End Sub
</source></big>
 
== [[w:C_SharpC Sharp|C#]] ==
<big><source lang="cpp">
void shellSort(ref int[] arr)
{
Строка 150 ⟶ 148 :
}
}
</source></big>
Этот более быстрый
<big><source lang="cpp">
private void shellSort(ref int[] vector)
{
Строка 169 ⟶ 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;
Строка 192 ⟶ 190 :
}
}
</source></big>
 
== [[w:Delphi_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,
Строка 238 ⟶ 236 :
until not (cur_inc <> -1);
end;
</source></big>
 
== [[w:PHP|PHP]] ==
<big><source lang="php">
function ShellSort($elements,$length) {
$k=0;
Строка 271 ⟶ 269 :
// $SortedElements=shellsort($UnsortedElements,length of list(an integer));
// e.g: $elements=shellsort($elements,10);
</source></big>
 
== [[w:Python|Python]] ==
<big><source lang="python">
import numpy
def shellsort(a):
Строка 293 ⟶ 291 :
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
d = n/2
Строка 308 ⟶ 306 :
end
puts mass
</source></big>
 
== [[w:Perl|Perl]] ==
<big><source lang="ruby">
@out=(5,3,7,9,2,1,6,5,3,7,9,3,4);
for(my$k=int($N/2);$k>0;$k=int($k/2)){
Строка 322 ⟶ 320 :
}
}
</source></big>
 
{{BookCat | filing = deep}}
[[Категория:Алгоритмы сортировки]]
 
[[en:Algorithm Implementation/Sorting/Shell sort]]