Übergabe einer Matrix an Unterprogramm

[gammatester]

Zitat von swarley:

Kann mir jemand erklären, wieso mein algorithmus im "vorderen Teil" der Matrix arbeitet und im "hinteren" nicht?

Ohne auf die merkwürdigen Interna dieser rekursiven Lösung einzugehen, hier ein Hinweis, warum es nicht funktionieren kann:

Zitat von swarley:

Delphi-Quellcode:

for i := a to spaltengauss - 1 do  begin
  matgauss[a,i]:=matgauss[a,i]/matgauss[a,a];
end;

Was soll das bezwecken? Was es bewirkt, ist doch folgendes: matgauss[a,a] wird auf 1 gesetzt, der Rest wird durch 1 geteilt, bleibt also gleich. Eventuell hilft ja hier

Delphi-Quellcode:

for i :=spaltengauss - 1 downto a begin
  matgauss[a,i]:=matgauss[a,i]/matgauss[a,a];
end;

und an der anderen Stelle.(Warum wird eigentlich a=zeilen-1 aus der Rekursion ausgespart?) Dies aber ohne Garantie. Wenn jemand unbedingt, etwas völlig Unorthodoxes programmieren will...