Школьный АЯ
алг Ниже диагонали (арг цел N, арг цел таб
A[1:N, 1:N], рез лит Otvet)
нач цел i, j, лит Flag
Flag:="Нет"; i:=2
нц пока (i< =N) и (Flag="Нет")| цикл по строкам
j:=1
нц пока (j<i) и (Flag="Нет")
| цикл по элементам строки
если A[i, j]<0| условие прерывания циклов
то Flag:="Да"
иначе j:=j+1 | продвижение по строке
все
кц
i:=i+1 | переход на новую строку
кц
если Flag="Да"
то Otvet:="Есть отрицательные ниже диагонали"
иначеOtvet:="Нет отрицательных ниже диагонали"
все
кон
