13 lines
266 B
Text
13 lines
266 B
Text
procedure main(args)
|
|
nr := integer(args[1]) | 3 # Default to 3x3
|
|
nc := integer(args[2]) | 3
|
|
|
|
A := list(nr)
|
|
every !A := list(nc)
|
|
|
|
x := ?nr # Select a random element
|
|
y := ?nc
|
|
|
|
A[x][y] := &pi
|
|
write("A[",x,"][",y,"] -> ",A[x][y])
|
|
end
|