Массивы в Delphi

[Nidheggg]

Дали такое задание:
В виз.компоненте Memo ввести треугольную матрицу, сортировать(видимо в порядке возрастания и убывания) и представить в виде одномерного массива в Label

Как можно сделать так, что бы можно было бы вписывать числа этаким треугольником, и чтобы они после этого "считывались" и сортировались как нужно
Навыками владею,но не силён

Думаю,должно быть что-то около того(наваяно в paint'e)