Две двумерный массив A[n,m]. Определить минимальный элемент из элементов ниже и выше побочной диогонали

Листинг программы и результат работы - в приложениях.Написано на PascalABC.NET, но должно работать и в простом Паскале.