Und ich wollte Dir gerade einen Lösungsweg mit einer m.E. etwas eleganteren while-Schleife aufzeigen.
Also, so ungefähr:
Delphi-Quellcode:
while untere_Grenze<obere_Grenze do
begin
Mitte:=(obere_Grenze-untere_Grenze) div 2
if //hier die Prüfung des gesuchten Elemente(schlüssel)s mit dem Elemente(schlüssel) an der Position Mitte und davon abhänig:
then obere_Grenze:=Mitte
else untere_Grenze:=Mitte
end