September Morn Update

2019-09-12 10:33:56 -07:00 · 2019-09-12 10:33:56 -07:00 · aac6731f2c
commit aac6731f2c
parent 4e2d22a71d
6856 changed files with 141342 additions and 21127 deletions
--- a/Task/Loops-For/BASIC/loops-for-13.basic
+++ b/Task/Loops-For/BASIC/loops-for-13.basic
@ -1,6 +1,11 @@
-for n = 1 to 5
-    for m = 1 to n
-        print "*";
-    next m
-    print
-next n
+If OpenConsole()
+  Define i, j
+  For i=1 To 5
+    For j=1 To i
+      Print("*")
+    Next j
+    PrintN("")
+  Next i
+  Print(#LFCR$+"Press ENTER to quit"): Input()
+  CloseConsole()
+EndIf