MergeSort Implementation, optimierungsbedraf?

[gammatester]

Bevor man optimiert, sollte man erst einmal die Fehler beseitigen und halbwegs sicher sein, daß der Code korrekt ist. Dein Code crasht zB mit Stackoverflow, wenn zB Start=Ende=0 ist. Eine mögliche Korektur:

Delphi-Quellcode:

if (High(IntArray) > 0) and (Ende>Start) then
begin
 //...
end;

Weiters sollte man die Compilerhinweise beachten: Das I := 0; nahe dem Ende ist überflüssig.