... lon nhat la ',max); readln; end.{Tron hai mang duoc sap xep tang dan thanh mot mang duoc sap xep tang dan}WriteLN('NHAP PHAN TU CHO MANG A:');Writeln('_________________________'); ... writeln('___________________'); for k:=1 to n+m do write(c[k],' ') ;} {Tron mang theo pp chan o cuoi} {Type mang= array[1 100] of integer; var a,b,c :mang; i,m,k,n,j:integer; begin write('Nhap n:');readln(n); ... ',s); writeln('So phan tu co gia tri bang ',k,' la ',d); Writeln(&apos ;Mang sau khi sap xep'); for m:=1 to n do write(a[m]); readln; End.{Tim doan dai nhat gom...