Data update

Task/Loops-Break/Langur/loops-break.langur

@@ -1,5 +1,5 @@
 for {
-    val .i = random 0..19
-    write .i, " "
-    if .i == 10 { writeln(); break }
+    val i = random(0..19)
+    write i, " "
+    if i == 10 { writeln(); break }
 }

Task/Loops-Break/PascalABC.NET/loops-break.pas

@@ -0,0 +1,10 @@
+begin
+  while True do
+  begin
+    var x := Random(0,19);
+    Print(x);
+    if x = 10 then
+      break;
+    Print(Random(0,19));
+  end;
+end.

Task/Loops-Break/S-BASIC/loops-break-1.basic

@@ -0,0 +1,13 @@
+var n = integer
+
+while (1 = 1) do
+  begin
+    n = int(rnd(1) * 20)
+    print n;
+    if n = 10 then goto 0_done
+    n = int(rnd(1) * 20)
+    print n
+  end
+0_done print " That's all!"
+
+end

Task/Loops-Break/S-BASIC/loops-break-2.basic

@@ -0,0 +1,14 @@
+var n = integer
+
+repeat
+  begin
+    n = int(rnd(1) * 20)
+    print n;
+    if n <> 10 then
+        print int(rnd(1) * 20)
+  end
+until n = 10
+
+print " That's all!"
+
+end