Задана матрица A[N, N]. Обнулить элементы матрицы, стоящие ниже главной диагонали. Сформировать вектор из элементов главной диагонали. Найти произведение этих элементов.

FAQ: Массивы. Матрицы. Типичные задачи
Здесь есть все, что нужно для решения задания...