unendlich viele zahlen

[resyiii]

also ich hab ein großes problem.
im informatikuntericht haben wir folgenden code:

Delphi-Quellcode:

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

type zahl=array [1..5] of integer;
var z:zahl; i,j,x: integer;

begin
for i:=1 to 5 do
begin write (i, 'Zahl'); readln (z[i]); end;
for j:=1 to 4 do
begin for i:=j+1 to 5 do
begin if z[j]<z[i] then begin
x:=z[i]; z[i]:=z[j]; z[j]:=x; end;
end;
writeln;
for i:=1 to 5 do write (z[i]);
readln;

  { TODO -oUser -cConsole Main : Hier Code einfügen }
end;
end.

und wir sollen jetzt statt nur fünf zahlen eine variable einsetzen, dass man eine beliebige anzahl von zahlen sortieren kann (37, 105, 1398 zahlen oder mehr)
ich weiß leider nicht, wie das gehen soll.
bin totaler delphineuling.

brauche schnell hilfe!