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/Loops-Do-while/PascalABC.NET/loops-do-while.pas
+++ b/Task/Loops-Do-while/PascalABC.NET/loops-do-while.pas
@ -0,0 +1,7 @@
+begin
+  var a := 0;
+  repeat
+    a += 1;
+    Print(a);
+  until a mod 6 = 0;
+end.
--- a/Task/Loops-Do-while/Sinclair-ZX81-BASIC/loops-do-while-2.basic
+++ b/Task/Loops-Do-while/Sinclair-ZX81-BASIC/loops-do-while-2.basic
@ -1,6 +0,0 @@
-10 REM Loops/Do-while
-20 LET I = 0
-30 LET I = I + 1
-40 PRINT I
-50 IF (I / 6) * 6 <> I THEN GOTO 30
-60 END
--- a/Task/Loops-Do-while/Sinclair-ZX81-BASIC/loops-do-while-1.basic
+++ b/Task/Loops-Do-while/Sinclair-ZX81-BASIC/loops-do-while-1.basic