Нужно написать код в pascal
условие:

Дан двумерный массив A размером NxM. Сформировать и вывести одномерный массив B по следующим правилам: Элементами являются среднее арифметическое элементов строк матрицы A​