Buenas, necesito ayuda co una practica y el problema es q no se por donde seguir. Lo que me piden es hacer el
adjunto en una matriz , si alguien pudieese darme al menos una idea se lo agradeceria mucho.
Saludos.
El codigo que tengo hasta ahora es el siguiente:
function Adjunto
(Matriz : in T_Matriz;
Fila : in Positive;
Columna : in Positive)
return T_Matriz
is
Adjunto : T_Matriz
(1 .. Matriz'Length (1) - 1, 1 .. Matriz'Length (2) - 1);
Matriz_Prima : T_Matriz (Matriz'Range (1), Matriz'Range (2));
F_Prima : Integer := 0;
C_Prima : Integer := 0;
begin
while
for F in Matriz'Range (1) loop
for C in Matriz'Range (2) loop
if F = Fila or C = Columna then
null;
else
Matriz_Prima (F, C) := Matriz (F, C);
F_Prima := F_Prima + 1;
C_Prima := C_Prima + 1;
end if;
Adjunto (F_Prima, C_Prima) := Matriz_Prima (F, C);
end loop;
end loop;
Adjunto (F_Prima, C_Prima) := Matriz_Prima (F_Prima, C_Prima);
return Adjunto;
end Adjunto;
Se que está mal, pero no se como arreglarlo!!!
Bye, gracias.
