Сортировка одномерного массива

[Гамбит]

Помогите люди добрые!
Дан массив целых чисел размера n(n=10).Получить упорядоченный по возрастанию массив, содержащий все различные числа данного массива

Своих наработок нет, ибо ничего не смыслю в массивах...
ПОМОГИТЕ !!!! БОГОМ ПРОШУ!!!!!!

[lamak]

в гугле ищи, и википедии есть примеры сортировки) если сложно самому написать

[Lemo]

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

  const
  n=10;
  var i,j,p:integer;
      a:array [1..n] of integer;
begin
randomize;
for I := 1 to  n do
  begin
    a[i]:=random(25)+1;
    write(a[i], ' ');
  end;
  writeln;

 for j:=1 to N-1 do
     for i:=1 to N-j do
     begin
       if a[i]>a[i+1] then
           begin
             p:=a[i];
             a[i]:=a[i+1];
             a[i+1]:=p;
           end;

     end;



    for I:= 1 to  n do
  begin

    write(a[i], ' ');
  end;
  readln;
end.

Метод сортировки Пузырек!