Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
21
Task/Loops-For/Creative-Basic/loops-for.basic
Normal file
21
Task/Loops-For/Creative-Basic/loops-for.basic
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
OPENCONSOLE
|
||||
|
||||
FOR X=1 TO 5
|
||||
|
||||
FOR Y=1 TO X
|
||||
|
||||
PRINT"*",:'No line feed or carriage return after printing.
|
||||
|
||||
NEXT Y
|
||||
|
||||
PRINT
|
||||
|
||||
NEXT X
|
||||
|
||||
PRINT:PRINT"Press any key to end."
|
||||
|
||||
DO:UNTIL INKEY$<>""
|
||||
|
||||
CLOSECONSOLE
|
||||
|
||||
END
|
||||
Loading…
Add table
Add a link
Reference in a new issue