RosettaCodeData/Task/Create-a-two-dimensional-array-at-runtime/Chipmunk-Basic/create-a-two-dimensional-array-at-runtime.basic

10 input "Enter two positive integers, separated by a comma? ";i,j
20 dim array(i,j)
30 array(i,j) = i*j
40 print "a(";str$(i);",";str$(j);") = ";array(i,j)
50 erase array