12 lines
345 B
Text
12 lines
345 B
Text
DIM array(10,10)
|
|
FOR row% = 0 TO 10
|
|
FOR col% = 0 TO 10
|
|
array(row%,col%) = RND(20) + 1
|
|
NEXT
|
|
NEXT row%
|
|
FOR row% = 0 TO 10
|
|
FOR col% = 0 TO 10
|
|
PRINT "row "; row%, "col ";col%, "value "; array(row%,col%)
|
|
IF array(row%,col%) = 20 EXIT FOR row%
|
|
NEXT
|
|
NEXT row%
|