Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

В заданном массиве X(N, M) все числа различны. В каждой строке выбирается
минимальный элемент, затем среди этих чисел выбирается максимальное. Напечатайте
номер строки массива Х, в которой расположено выбранное число.

Ответ оставил Гость

Const
n1=1000;
m1=1000;
var
n,m,i,j,min,max,i_max:integer;
a:array[1..n1,1..m1]of integer;
    begin
        writeln(введите кол строк и столбцов);
         readln(n,m);
             for i:=1 to n do
                 for j:=1 to m do
                      readln(a[i,j]);
for i:=1 to n do
    begin
        writeln;
              for j:=1 to m do
                    write(a[i,j]:4);
    end;
max:=-32767;
for i:=1 to n do
    begin
        min:=a[i,1];
           for j:=1 to m do   
                if a[i,j]                   min:=a[i,j];
         if min>max then
              begin
                   max:=min;
                   i_max:=i;
              end;
      end;
writeln;
writeln(i: ,i_max,    znach: ,max);
end.