Noch was zu Blatt 2:
überprüfe, wie beschrieben, wo die zahl eingefügt werden muss, und füge sie so ein, wie ich oben beschrieben habe.
Überprüfen, wo die Zahl hingehört (mit for Schleife, ähnlich geht's mit while):
Delphi-Quellcode:
var Position: integer;
...
for i := 0 to Max do
if array[i] < Zahl then
Position := i else
if array[i] > Zahl then break;
ungetestet!