Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
|
|
@ -0,0 +1,15 @@
|
|||
proc shellSort[T](a: var openarray[T]) =
|
||||
var h = a.len
|
||||
while h > 0:
|
||||
h = h div 2
|
||||
for i in h .. < a.len:
|
||||
let k = a[i]
|
||||
var j = i
|
||||
while j >= h and k < a[j-h]:
|
||||
a[j] = a[j-h]
|
||||
j -= h
|
||||
a[j] = k
|
||||
|
||||
var a = @[4, 65, 2, -31, 0, 99, 2, 83, 782]
|
||||
shellSort a
|
||||
echo a
|
||||
Loading…
Add table
Add a link
Reference in a new issue