Hallo,bitte um Hilfe!
ALSO:
Ich habe ein problem und zwar:
Ich habe ein ARRAY(Z)[1..100] mit zufallszahlen.
möchte die nun so ordnen,dass die kleinste Zahl in Z[1]
und die größte in Z[100]ist
habe bereits ein Programm geschrieben ABER es funktioniert irgenwie nicht
wenn ich die sortierten Zahlen in ein memo einblenden lasse
ist irgendwie die letzte Zahl immer 0 und die erste zahl Z[1]
WIRD DIE GRÖGERE VON DEN BEIDEN ERSTEN ZAHLEN
Mein nichts funktionsfähiges programm:
I:=1;
repeat
Begin
IF Z[I]<Z[I+1] then
hilf:=z[I];
Z[I]:=Z[I+1];
Z[I+1]:=hilf;
I:=I+1;
END;
UNTIL I=E+1;
DANKE IM VORAUS!!!!!!!!!!!