... Fi = 'madq.inp'; D : Array [1 8] of -2 2 = ( -2 , -2 ,-1 ,1 ,2, 2,1 ,-1 ); C : Array [1 8] of -2 2 = (-1 ,1 ,2, 2,1 ,-1 , -2 , -2 ); Var F : Text; T1,T2 : longint; A : Array[1 Max,1 Max] of Integer; ... nhau của hoán vị S(1 ,2, 3) 123 B1 : i =1 123 21 3 3 12 j = 1 ,2, 3B2 : i = 2 123 1 32 213 23 1 3 12 321 j =2, 3 B3 : i =3 123 1 32 213 23 1 3 12 321 j=3Tµi liÖu chuyªn Tin 11 23 Uses Crt; Const Max ... cũng có lợi lắm đấy . *Tµi liÖu chuyªn Tin 11 25 dy : Array[1 8] of integer=( 1, 2, 2, 1 ,-1 , -2 , -2 ,-1 );Var N,x,y : Byte; A : Array [-1 max +2 ,-1 max +2] of Integer;Procedure Nhap; Begin Write('Nhap...