Pascal. Tömb rendezése növekvő sorrendbe?

Sziasztok,

Egy kis segítséget kérnék..Szóval van egy 10 elemű tömböm egész random számokból és ezeket szeretném növekvő sorrendbe állítani. A minimum kiválasztás megvan, és a tömb elemeinek cseréjével igyekeztem megoldani.

Program tomb;

uses crt;

var t: array [1..10] of integer;

i,x,a,min: integer;

Begin

Clrscr;

randomize;

// szám generálás

for i := 1 to 10 do begin

t[i]:= random(100)+1;

writeln(t[i]);end;

readkey;

// szám cserélye

for i := 1 to 10 do begin

x:= t[i];

t[i] := t[10-i+1];

t[10-i+1] := x;

end;

// min. kiválasztás

min := t[1];

for i := 1 to 10 do

if t[i] < min then min := t[i];

for i := 1 to 10 do

writeln(t[i]);

readkey;

End.

Ez van meg, de ezt össze kéne hangolni vhogy, csak nem tudom hogyan...