estoy tratando de calcular de forma recursiva los elementos de una matriz de MxN. Al intentar dividir cada elemento de MxN da error de Floating Point Error
.
function promMatRec(mNum:mat1;n,m,mMax:byte):real;
begin
if m>0 then
promMatRec:=(mNum[n,m])/(m*n)+(promMatRec(mNum,n,m-1,mMax))
else //porque se rompe si pongo m*n?
if n>0 then
promMatRec:=promMatRec(mNum,n-1,mMax,mMax);
end;
El de arriba compila. El de abajo no.
function promMatRec(mNum:mat1;n,m,mMax:byte):real;
begin
if m>0 then
promMatRec:=(mNum[n,m])/(9)+(promMatRec(mNum,n,m-1,mMax))
else //porque se rompe si pongo m*n?
if n>0 then
promMatRec:=promMatRec(mNum,n-1,mMax,mMax);
end;
Estoy intentando hallar el promedio de esta matriz de MxN recursivamente, pero cuando divido por MxN a cada elemento me da Floating Point Error
, y no entiendo bien porque, m y n están definidas como byte, aunque ya probe usando integer y sigo con el mismo problema.