Определить значение и индексы первого элемента матрицы - Pascal

Формулировка задачи:

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

Решение задачи: «Определить значение и индексы первого элемента матрицы»

Листинг программы

for i:=1 to m do for j:=1 to n do
  if a[i,j]=i+j then begin
    WriteLn('a[',i,',',j,']=',a[i,j]); Break;
  end;

Объяснение кода листинга программы

В данном коде используется два вложенных цикла for для прохода по всем элементам матрицы. Внутренний цикл выполняется для прохода по строкам матрицы, а внешний цикл — для прохода по столбцам. Целью вложенных циклов является проверка условия, что элемент матрицы a[i,j] равен сумме его индексов i и j. Если это условие выполняется, то в консоль выводится сообщение с названием и значением элемента, после чего выполнение программы прерывается командой Break. Значение переменной Break останавливает выполнение внутреннего цикла, и программа продолжает работу со следующего элемента внешнего цикла. Номера элементов матрицы формируются с помощью переменных i и j, которые изменяются от 1 до m и n соответственно. Список элементов кода:

Цикл for для прохода по строкам матрицы.
Цикл for для прохода по столбцам матрицы.
Проверка условия a[i,j]=i+j.
Вывод в консоль названия и значения элемента матрицы.
Команда Break для остановки выполнения внутреннего цикла.
Продолжение работы программы со следующего элемента внешнего цикла.