Data update

Task/Loops-Downward-for/Ada/loops-downward-for.adb

@@ -0,0 +1,3 @@
+for I in reverse 0..10 loop
+   Put_Line(Integer'Image(I));
+end loop;

Task/Loops-Downward-for/COBOL/loops-downward-for.cob

@@ -0,0 +1,14 @@
+identification division.
+program-id. countdown.
+environment division.
+data division.
+working-storage section.
+01	counter 		pic 99.
+	88	counter-done	value 0.
+01	counter-disp	pic Z9.
+procedure division.
+	perform with test after varying counter from 10 by -1 until counter-done
+		move counter to counter-disp
+		display counter-disp
+	end-perform
+	stop run.

Task/Loops-Downward-for/Chapel/loops-downward-for-1.chpl

@@ -0,0 +1,2 @@
+for i in 1..10 by -1 do
+	writeln(i);

Task/Loops-Downward-for/Chapel/loops-downward-for-2.chpl

@@ -0,0 +1,2 @@
+var r = 1..10;
+for i in r by -1 do { ... }

Task/Loops-Downward-for/Euphoria/loops-downward-for.eu

@@ -0,0 +1,3 @@
+for i = 10 to 0 by -1 do
+    ? i
+end for

Task/Loops-Downward-for/Haxe/loops-downward-for.hx

@@ -0,0 +1,22 @@
+class Step {
+  var end:Int;
+  var step:Int;
+  var index:Int;
+
+  public inline function new(start:Int, end:Int, step:Int) {
+    this.index = start;
+    this.end = end;
+    this.step = step;
+  }
+
+  public inline function hasNext() return step > 0 ? end >= index : index >= end;
+  public inline function next() return (index += step) - step;
+}
+
+class Main {
+  static function main() {
+    for (i in new Step(10, 0, -1)) {
+      Sys.print('$i ');
+    }
+  }
+}

Task/Loops-Downward-for/Jactl/loops-downward-for-1.jactl

@@ -0,0 +1,3 @@
+for (int i = 10; i >= 0; i--) {
+  println i
+}

Task/Loops-Downward-for/Jactl/loops-downward-for-2.jactl

@@ -0,0 +1 @@
+11.each{ println 10 - it }

Task/Loops-Downward-for/Jactl/loops-downward-for-3.jactl

@@ -0,0 +1 @@
+print 11.map{ "${10 - it}\n" }.join()

Task/Loops-Downward-for/LOLCODE/loops-downward-for.lol

@@ -0,0 +1,7 @@
+HAI 1.3
+
+IM IN YR DOWNLOOP NERFIN YR N TIL BOTH SAEM N AN -11
+    VISIBLE SUM OF N AN 10
+IM OUTTA YR DOWNLOOP
+
+KTHXBYE

Task/Loops-Downward-for/PowerShell/loops-downward-for-1.ps1

@@ -0,0 +1,3 @@
+for ($i = 10; $i -ge 0; $i--) {
+    $i
+}

Task/Loops-Downward-for/PowerShell/loops-downward-for-2.ps1

@@ -0,0 +1 @@
+10..0

Task/Loops-Downward-for/Rebol/loops-downward-for.rebol

@@ -0,0 +1 @@
+for i 10 0 -1 [print i]