Min-Sort Verfahren

[gammatester]

Da Pascal keinen Unterschied zwischen i und I macht, benutzt du in

Delphi-Quellcode:

for i:= 1 to 20 do
memo1.Lines.Add(inttostr(za[i]));

den äußeren Schleifenindex doppelt. Nimm einfach ein anderen zB k (der dann natürlich deklariert werden muß).