Готовое решение задачи Паскаль. Решения Pascal. Задачи паскаль. Задачи pascal

Условие Задачи: Решение ТУТ

Задана матрица Z(5,5).Если есть отрицательный элемент в строке, просуммировать все последующие элементы в этой строке, и этой суммой заменить элемент на главной диагонали. Элементы главной диагонали (заменяемые) вывести в массив В.

___________________________________________________________