... Clrscr; Writeln(‘moi ban nhap so hang m =’); Readln(m); Writeln(‘moi ban nhap so cot n = ‘); Readln(n); For i:=1 to m do For j:=1 to n do Begin Write(‘moi ban nhap phan tu a[‘,i,’,’,j,’] ... :integer;Begin Clrscr; Write(moi ban nhap so hang m = ); Readln(m); Write(moi ban nhap so cot n = ); Readln(n);For i:=1 to m do For j:=1 to n do Begin Write(moi ban nhap phan tu a[,i,,,j,] =); ... / /BeginWrite( moi ban nhap so hang m = );Readln(m);Write( moi ban nhap so cot n = );Readln(n);For i:= 1 to m do For j:= 1 to n do Begin Write( moi ban nhap phan tu a[,i,,,j, ] = );...