algoritmon II matriz

Dada uma matriz M (5 x 7), preench-la por leitura e mostrar o maior elemento de cada linha da matriz o maior elemento de cada coluna da matriz a mdia dos elementos de cada coluna o produto de todos os elementos diferentes de zero quantos elementos so negativos posio ocupada (linha-coluna) por um elemento cujo valor ser lido pelo programa. exercicio 1 da lista de matrizes. Cada item do exercicio est resolvido separadamente para maior clareza, mas o mesmo loop que percorre a matriz poderia ter sido usado para mais de um dos itens. program matriz5x7 var i, j, maior, soma,N,produto,neg,achei,MAXLIN,MAXCOLinteger M array 1..5, 1..7 of integer Begin neg0 produto1 MAXLIN5 MAXCOL7 Leitura na matriz M write(digite os dados da matriz) for i1 to MAXLIN do begin writeln(Linha , i) for j1 to MAXCOL do readln(Mi,j) end o maior elemento de cada linha da matriz for i1 to MAXLIN do begin maior0 for j1 to MAXCOL do if Mi,jmaior then maiorMi,j writeln(O maior elemento da linha , i, eh ,maior) end o maior elemento de cada coluna da matriz for j1 to MAXCOL do begin maior0 for i1 to MAXLIN do if Mi,jmaior then maiorMi,j writeln(O maior elemento da coluna ,j, eh ,maior) end a mdia dos elementos de cada coluna for j1 to MAXCOL do begin soma0 for i1 to MAXLIN do somasomaMi,j writeln(A media da coluna ,j, eh ,soma/MAXLIN) end o produto de todos os elementos diferentes de zero for i1 to MAXLIN do for j1 to MAXCOL do if Mi,j0 then produtoprodutoMi,j writeln(O produto dos elementos nao nulos eh ,produto) quantos elementos so negativos for i1 to MAXLIN do for j1 to MAXCOL do if Mi,j0 then negneg1 writeln(O numero de elementos negativos eh ,neg) posio ocupada (linha-coluna) por um