Напишите программку, которая обретает малый и наибольший элементы из частей матрицы

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

Задать свой вопрос
1 ответ
var n,m,i,j,t:integer; a:array[1..20,1..25] of integer; q:integer; begin q:=55; writeln (Введите размерность матрицы A MxN); writeln (M=); read (n); writeln (N=); read (m); for i:=1 to n do for j:=1 to m do begin writeln (A[,i,, , , , j,]=); readln (a[i,j]); end; for i :=1 to n do begin for j :=1 to m do write ( a [ i, j ]:4); writeln ; end ; for i:=1 to n do for j:=1 to m do If ((a[i,j] mod 2)=0) and (a[i,j]gt;0) then begin q:=555; writeln (a[i,j]) ; writeln (i=,i); writeln (j=,j); writeln; end; If q=55 then writeln (Таких частей нет! ); end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт