Inverse einer matrix

[DeddyH]

Das break gehört zur Schleife

Zitat:

Delphi-Quellcode:

for k := 0 to zeilen1 - 1 do
  for j := 0 to zeilen1 - 1 do //hier
    if j <> k then
      begin
        for i := 0 to spalteninv - 1 do
          matIn[j, i] := matIn[j, i] - ((matIn[j, k] / matIn[k, k]) * matIn[k, i]);
      end
    else
      break;