... HSG LỚP 11 NĂM HỌC 2 01 0-2 011 MÔN TIN HỌC 11 Bài 1( 4đ)PROGRAM BAI1;USES CRT;VAR tg,i,j,n:integer; a:array [1 20] of integer;BEGIN Clrscr; write('Nhap n='); Readln(n); For i: =1 to ... ', Dem); Readln; END .Bài 3(6đ) - Câu a: 2đ - Câu b: 2đ - Câu c:2đPROGRAM BAI3;USES CRT;VAR A: array [1 10 ,1 10] of integer; B :array [1 100]of integer; tg, k, n,i,j,x,dem,S,max:Integer;BEGIN ... mảng 1 chiều B} k:=0; For i: =1 to n do For j: =1 to n do If k<n*n then begin k:=k +1; b[k]:=a[i,j]; end;{Sắp xếp mảng 1 chiều B theo thứ tự tăng dần} For i: =1 to n*n -1 do For j:=i+1...