Дана матрица M;N. Найти минимальный элемент среди тех строк, которые упорядочены либо по убыванию, либо по возрастанию - QBasic

FOR i=1 TO n
mm=m-1
FOR j=2 TO m
IF a(j)>a(j-1) THEN x=x+1
IF a(j)=a(j-1) THEN mm=mm-1
IF a(j)<a(j-1) THEN x=x-1
NEXT j
IF x=mm THEN min(n)=a(1)
IF x=-mm THEN min(n)=a(m)
NEXT i