Data update

2024-07-13 15:19:22 -07:00 · 2024-07-13 15:19:22 -07:00 · 5c1bb7bfa9
commit 5c1bb7bfa9
parent 29a5eea0d4
2011 changed files with 35081 additions and 3229 deletions
--- a/Task/Sorting-algorithms-Comb-sort/EasyLang/sorting-algorithms-comb-sort.easy
+++ b/Task/Sorting-algorithms-Comb-sort/EasyLang/sorting-algorithms-comb-sort.easy
@ -0,0 +1,17 @@
+proc combsort . d[] .
+   gap = len d[]
+   while gap > 1 or swaps = 1
+      gap = higher 1 (gap div 1.25)
+      swaps = 0
+      for i = 1 to len d[] - gap
+         j = i + gap
+         if d[i] > d[j]
+            swap d[i] d[j]
+            swaps = 1
+         .
+      .
+   .
+.
+d[] = [ 88 18 31 44 4 0 8 81 14 78 20 76 84 33 73 75 82 5 62 70 ]
+combsort d[]
+print d[]