Задача на процедуру.
Составить процедуру подсчета количества n элементов одномерного массива, значения которых больше числа P. С помощью этой процедуры подсчитать суммы элементов в главной и побочной диагоналях в произвольно заданной квадратной матрице B. Вывести сообщение, какая диагональ имеет минимальное значение