  100 dim a ( 10 * 20 ) 
  105 dim b(10)
  110 for i = 1 to 10
  120  for j = 1 to 20
  130   rem a ( i , j ) = i * 100 + j
  131    b(i)= i * 100 + j
  140   next 
  150  next 
  160 for i = 1 to 10
  170  for j = 1 to 20
  180   rem print a ( i , j ) , 
  181   print b ( i ) , 
  190   next 
  200  print 
  210  next 
