7 lines
197 B
Text
7 lines
197 B
Text
arraybase 1
|
|
input integer "Enter one positive integer: ", i
|
|
input integer "Enter other positive integer: ", j
|
|
dim a(i, j)
|
|
a[i, j] = i * j
|
|
print "a("; string(i); ","; string(j); ") = "; a[i, j]
|
|
end
|