Оформить в виде подпрограмм-процедур в программе pascal: дана матрица действительных чисел m×n.найти матрицу того же порядка, в которой элемент равен 1, если соответствующий ему элемент начальной матрицы больше, чем элемент, расположенный в его строке на главной диагонали, и равен 0 в обратном случае.