16 lines
196 B
Text
16 lines
196 B
Text
dim a(20, 20)
|
|
|
|
for i = 0 to 19
|
|
for j = 0 to 19
|
|
a[i, j] = int(rand * 20) + 1
|
|
next j
|
|
next i
|
|
|
|
for i = 0 to 19
|
|
for j = 0 to 19
|
|
print a[i, j];" ";
|
|
if a[i, j] = 20 then end
|
|
next j
|
|
next i
|
|
|
|
end
|