Gostaria de Uma ajuda no seguinte exercicio de função     Faça uma função que receba uma matriz 61x10. A função deve somar individualmente as colunas da matriz e armazenar o resultado na 61a linha da matriz. A função deve retornar a matriz alterada. :mellow:   Ah minha função que eu fiz é a seguinte    function calc(a : matriz ) : integer;
var
   soma : integer;
begin
   soma := 0;
   for l := 1 to 60 do
   begin
      for c := 1 to 10 do
      begin
         soma   := soma + a[l,c];
         a[61,c] := soma;
      end;
   end;
end;