apps/examples/bas/tests/test22.bas


1
2
3
4
5
6
7
8
9
10
11
12
13
14

dim a(2,2)
for i=0 to 2
  for j=0 to 2
    a(i,j)=i*10+j
  next
next
for j=1 to 2
  for i=1 to 2
    print using " ##.##";a(i,j),
  next
  print
next
mat print using " ##.##";a,a