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

ПЕР
  матрица: РЯД N, M ИЗ ЦЕЛ;
  мин, макс, сч1, сч2, строка, столбец: ЦЕЛ;

УКАЗ
  мин := матрица[0, 0]; макс := мин;
  строка := 0; столбец := 0;
  ОТ сч1 := 0 ДО N - 1 ВЫП
    ОТ сч2 := 0 ДО M - 1 ВЫП
      ЕСЛИ матрица[сч1, сч2] > макс ТО макс := матрица[сч1, сч2]
      АЕСЛИ матрица[сч1, сч2] < мин ТО
        мин := матрица[сч1, сч2];
        строка := сч1; столбец := сч2
      КОН
    КОН
  КОН;
  ОТ сч1 := 0 ДО M - 1 ВЫП
    матрица[строка, сч1] := макс
  КОН