Определение слабой рефлексивности и треугольности матрицы - Delphi

[Saccn]

Помогите с задачей.
Дана матрица X[n x n] . Составить программу определения слабой рефлексивности и треугольности матрицы X[n x n] .
Матрица является слабо рефлексивной, если для всех i,j выполняется следующее условие: Min(ai,i,aj,j>=ai,j .
Пример расположение элементов в правой треугольной матрице порядка n : сначала идет n элементов 1-ой строки; затем (n-1) элемент 2-ой строки, начиная со второго элемента; и т.д (в последней n строке есть только n-ый элемент) .