DIM A(2),B(2),M(2,2)
DATA 1,1
MAT READ A
DATA 0,1
DATA 1,1
MAT READ M
PRINT
PRINT " 1:  1"
PRINT " 2:  1"
MAT B=M*A
MAT A=M*B
PRINT " 3: ";A(1)
FOR n=4 TO 20
   MAT A=M*A
   PRINT USING "##":n;
   PRINT ": ";A(1)
NEXT n
END