... theo nhau của hoán vị S(1,2,3) 123 B1 : i =1 123 213 312 j = 1,2,3B2 : i = 2 123 132 213 231 312 321 j=2,3 B3 : i =3 123 132 213 231 312 321 j=3 Tài liệu chuyên Tin 11 20 Var i,j,u,v : Integer; ... Writeln('**'); End; Textcolor (12) ; For i:=sodia downto 1 do Begin Gotoxy(50,24-i); Writeln('**'); End; Tài liệu chuyên Tin 11 12 Textcolor(9); For i:=sodia downto 1 ... Gotoxy(50,24-h2); Textcolor (12) ;Write('**');Textcolor(15); Case Y of '1': Begin Inc(h1);A[h1] := B[h2]; Gotoxy(40,24-h1); Write(A[h1]:2); Tài liệu chuyên Tin 11 13 End; '3'...