... 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); ... a:array[1..100] of integer; n,dem,i,j,tong,max,vt:integer; begin write('Nhap so phan tu cua mang: ');readln(n); for i:=1 to n do begin write('Nhap a[',i,']:');readln(a);...