400 Zufallszahlen erzeugen & Bubble sortieren

[hansklok]

zunächst die 400 Zufallszahlen erstellen:

Delphi-Quellcode:

var 
  Zahl: byte; 
begin 
  randomize; //Initialisieren des Zufallszahlengenerators
  Zahl:= Random(400); //0-400
end;

weiter bin ich leider noch nicht!