DATA 1,1
DATA 1,0
DIM A(2,2)
MAT READ A
DATA 1,1
DATA 1,0
DIM B(2,2)
MAT READ B
PRINT " 1 :";1;"    ���� 1"
LET n=1
LET i=1
DO WHILE i<20
   MAT B=B*A
   LET n=n+B(1,2)
   PRINT i+1;":";B(1,2);"    ����";n
   LET i=i+1
LOOP
PRINT
MAT PRINT B
END