Bài tập mảng 2 chiều: Bài 3: Số lớn nhất trong mỗi dòng của bảng. số lớn nhất trong mỗi cột của bảng số có kích thước MxN MN GIÚP MK VS ĐẢM BẢO 5*

0 bình luận về “Bài tập mảng 2 chiều: Bài 3: Số lớn nhất trong mỗi dòng của bảng. số lớn nhất trong mỗi cột của bảng số có kích thước MxN MN GIÚP MK VS ĐẢM BẢO 5*”

1. uses crt;
   var m,n,i,j,max:longint; a:array[1..1000,1..1000]of longint;
   begin
   clrscr;
      write(‘m=’);readln(m);
      write(‘n=’);readln(n);
      for i:=1 to m do
         for j:=1 to n do
            begin
               write(‘a[‘,i,’,’,j,’]=’);readln(a[i,j]);
            end;
      for i:=1 to m do
         begin
            max:=a[i,1];
            for j:=1 to n do if a[i,j]>max then max:=a[i,j];
            writeln(‘Max cua hang ‘,i,’: ‘,max);
         end;
      for j:=1 to n do
         begin
            max:=a[1,j];
            for i:=1 to m do if a[i,j]>max then max:=a[i,j];
            writeln(‘Max cua cot ‘,j,’: ‘,max);
         end;
   readln
   end.

   Bình luận