Сформировать вектор B, состоящий из элементов матрицы, которые минимальны в своей строке

@Анатолий))) · Регистрация: 10.04.2011

Author24 — интернет-сервис помощи студентам

Дана матрица A[m,n]. Сформировать вектор B, состоящий из элементов матрицы, которые минимальны в своей строке и одновременно максимальны в своем столбце.

@aka_GRAD · 22.05.2011, 15:16

Pascal

Program Forum;
uses crt;
 const
  n=4;
  m=5;
  Matrica: array[1..n,1..m] of integer=((10,9,30,40,50),(3,7,12,6,5),(35,1,9,2,2),(4,2,52,11,7));
 
  var
   min,i,j,st:integer;
 
  Function Max_Stolbec(n,k:integer):integer;
   var
    i,max:integer;
   begin
     max:=-1000;
      For i:=1 to n do
       IF Matrica[i,k]>max then
        Max:=Matrica[i,k];
     Max_Stolbec:=Max;
   end;
 
  begin
   ClrScr;
   For i:=1 to n do
    begin
     min:=1000;
     For j:=1 to m do
      if Matrica[i,j]<min then
       begin
        Min:=Matrica[i,j];
        St:=j;
       end;
      IF Min=Max_Stolbec(n,st) then
       Writeln('Число = ',min,' ',i,' Строка ',st,'Столбец');
    end;
    Readln;
  end.

@Анатолий))) 0 / 0 / 0 Регистрация: 10.04.2011 Сообщений: 35
		1
	Сформировать вектор B, состоящий из элементов матрицы, которые минимальны в своей строке 22.05.2011, 14:40. Показов 1069. Ответов 1 Метки нет (Все метки) Дана матрица A[m,n]. Сформировать вектор B, состоящий из элементов матрицы, которые минимальны в своей строке и одновременно максимальны в своем столбце. 0

	22.05.2011, 15:16

Сформировать вектор B, состоящий из элементов матрицы, которые минимальны в своей строке

Решение