Напишите программу которая находит минимальный из четных положительных элементов матрицы...

0 голосов
145 просмотров

Напишите программу которая находит минимальный из четных положительных элементов матрицы учтите что таких элементов в матрице может и не быть c++ двумерные массивы​


Информатика (74 баллов) | 145 просмотров
Дан 1 ответ
0 голосов

Ответ:

Объяснение:

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016

begin

 var m:=ReadInteger('Число строк=');

 var n:=ReadInteger('Число стролбцов=');

 var a:=MatrixRandom(m,n,-99,99);

 var imax:=-1; var jmax:=0;

 var imin:=0; var jmin:=0;

 var min:=100; var max:=-100; // больше большего, меньше меньшего

 for var i:=0 to m-1 do begin

   for var j:=0 to n-1 do begin

     Write(a[i,j]:4);

     if (a[i,j]>0) and (a[i,j] mod 2=0) then begin

       if a[i,j]

       if a[i,j]>max then begin imax:=i; jmax:=j; max:=a[i,j] end

       end

     end;

   Writeln

   end;

 if imax<>-1 then begin

   Writeln('Минимальный четный положительный элемент A[',

       imin+1,',',jmin+1,']=',a[imin,jmin]);

   Writeln('Максимальный четный положительный элемент A[',

     imax+1,',',jmax+1,']=',a[imax,jmax])

   end

 else

   Writeln('В массиве нет положительных четных элементов')

end.

(14 баллов)
0

мне нужен с++

0

Ищи другое значит)

0

ахахахахахахахха) верни баллы