Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
14
Task/Loops-Nested/BASIC/loops-nested.basic
Normal file
14
Task/Loops-Nested/BASIC/loops-nested.basic
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
DIM a(1 TO 10, 1 TO 10) AS INTEGER
|
||||
CLS
|
||||
FOR row = 1 TO 10
|
||||
FOR col = 1 TO 10
|
||||
a(row, col) = INT(RND * 20) + 1
|
||||
NEXT col
|
||||
NEXT row
|
||||
|
||||
FOR row = LBOUND(a, 1) TO UBOUND(a, 1)
|
||||
FOR col = LBOUND(a, 2) TO UBOUND(a, 2)
|
||||
PRINT a(row, col)
|
||||
IF a(row, col) = 20 THEN END
|
||||
NEXT col
|
||||
NEXT row
|
||||
Loading…
Add table
Add a link
Reference in a new issue