Data update

Task/Sorting-algorithms-Gnome-sort/VBScript/sorting-algorithms-gnome-sort-1.vb

@@ -1,27 +0,0 @@
-function gnomeSort( a )
-	dim i
-	dim j
-	i = 1
-	j = 2
-	do while i < ubound( a ) + 1
-		if a(i-1) <= a(i) then
-			i = j
-			j = j + 1
-		else
-			swap a(i-1), a(i)
-			i = i - 1
-			if i = 0 then
-				i = j
-				j = j + 1
-			end if
-		end if
-	loop
-	gnomeSort = a
-end function
-
-sub swap( byref x, byref y )
-	dim temp
-	temp = x
-	x = y
-	y = temp
-end sub

Task/Sorting-algorithms-Gnome-sort/VBScript/sorting-algorithms-gnome-sort-2.vb

@@ -1,22 +0,0 @@
-dim a
-dim b
-
-a = array( "zanzibar", "aardvark","ampicillin","zulu","gogodala", "wolverhampton")
-b = gnomeSort( a )
-wscript.echo join(a, ", ")
-
-a = array( 234,567,345,568,2345,89,547,23,649,5769,456,456,567)
-b = gnomeSort( a )
-wscript.echo join(a, ", ")
-
-a = array( true, false, true, true, false, false, true, false)
-b = gnomeSort( a )
-wscript.echo join(a, ", ")
-
-a = array( 1,2,2,4,67789,-3,-45.99)
-b = gnomeSort( a )
-wscript.echo join(a, ", ")
-
-a = array( now(), now()-1,now()+2)
-b = gnomeSort( a )
-wscript.echo join(a, ", ")

Task/Sorting-algorithms-Gnome-sort/VBScript/sorting-algorithms-gnome-sort-3.vb

@@ -1,5 +0,0 @@
-aardvark, ampicillin, gogodala, wolverhampton, zanzibar, zulu
-23, 89, 234, 345, 456, 456, 547, 567, 567, 568, 649, 2345, 5769
-True, True, True, True, False, False, False, False
--45.99, -3, 1, 2, 2, 4, 67789
-2/02/2010 10:19:51 AM, 3/02/2010 10:19:51 AM, 5/02/2010 10:19:51 AM