Задача на матрицу Опции

[Гость]

Дана матрица размерности N*N, найти минимальный (максимальный) элемент, и заменить нулями элементы в строке и столбце, на пересечении которых расположен данный элемент.
А вот с эти разобраться не получается, подскажите пожалуйста...

На надо пихать в одну тему сто разных задач, перемещено

Сообщение отредактировано: klem4 - 20.01.2006 15:54

[Alla]

Так я вроде в своей теме вопрос задавала
Что не получается, все не получается
Пробую найти миниммальный элемент, а вместо этого нахожу максимальный:

Код

program test1;
const n=3;
      m=3;
var
a : array[1..n, 1..m] of integer;
i,j,min : integer;
begin
writeln('Vvod elementov', n, 'x', m);
  min:=a[1,1];
  for i:=1 to n do
   for j:=1 to m do
  begin
   readln(a[i,j]);
   if min < a[i,j] then
   min:=a[i,j];
  end;
  writeln(min);
  readln;
end.

Как элементы заменить я вообще не представляю, как указать ту строку и столбец в которой мне надо заменять и как сказать, чтобы заменилось на 0 ???