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

Question

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

Юлиана · Accepted Answer

Выше второстепенной i < j. перебор элементов массива в цикле и если выполняется это условие и элемент меньше нуля - запись во второй массив. 
Готовый код заказывайте, если надо.