Developing.ru

Доброго времени суток всем =) Помогите пожалуйста в написании программы по двухмерным массивам.
вот сама задача:
Заданная матрица 10х10 со случайными (от 0 до 100) целыми элементами. Раз -
печатать эту таблицу. Вычислить сумму элементов заштрихованной части.
Элементы диагоналей также нужно включать в сумму.

i - координата по x, считается слева, j - по у, считается сверху
for i:=1 to 10 do
for j:=1 to 10 do
if (j>=5+abs(5-i+1)) then (элемент в заштрихованной области, делаем что хотим)