Обнулить нечетные элементы в двумерном массиве

ОТДЕЛ Задание+;

ПОСТ
  N = 10;
  M = 10;

ПЕР
  массив: РЯД N, M ИЗ ЦЕЛ;
  сч1, сч2: ЦЕЛ;

УКАЗ
  ОТ сч1 := 0 ДО N - 1 ВЫП
    ОТ сч2 := 0 ДО M - 1 ВЫП
      ЕСЛИ массив[сч1, сч2] ОСТАТОК 2 = 1 ТО
        массив[сч1, сч2] := 0
      КОН
    КОН
  КОН

КОН Задание.