Pascal/Turbo Pascal - M pueden ayudar por favor!!

hola.. nesecito si alguien me puede ayudar! hacer un programa en pascal!! mucho no entiendo este lenguaje por eso!! me va mejor con borlan c++.

tengo que cargar un vector de 10 numeros.. y usar el metodo ordenacion ordenarlos de menor a mayor y imprimir... por favor si alguien me puede ayudar! hace dias estoy tratando de hacer pero no me sale nada!! desde ya muchas gracias....

Esta forma de ordenamiento se llama "metodo burbuja". Es la mas facil, pero si la usas con un vector muy grande (digamos de miles y miles de datos) te consume mucha memoria y tiempo.
Aca tenes el codigo fuente!

program Burbuja;

type
TVector = array [1..10] of integer;

procedure LeerVector(var V:TVector);
var
Cont,Dato:Integer;
begin
for Cont := 1 to 10 do begin
Write('Ingrese el numero:' );
Readln(Dato);
V[Cont]:=Dato;
end;
end;

procedure Ordenar(var V:TVector);
var
Temp:TVector;
I,J,Dato:Integer;
begin
for I := 1 to 9 do begin
for J := 1 to 10-I do begin
if (V[J]>V[J+1]) then begin
Dato:=V[J];
V[J]:=V[J+1];
V[J+1]:=Dato;
end;
end;
end;
end;

procedure ImprimirVector(V:TVector);
var
I:Integer;
begin
for I := 1 to 9 do
Write(V[I],' - ');
Writeln(V[10]);
end;

var
Vector:TVector;
begin
LeerVector(Vector);
Writeln;
Writeln('Vector antes de ordenar:');
ImprimirVector(Vector);
Writeln;
Writeln('Vector ordenado:');
Ordenar(Vector);
ImprimirVector(Vector);
Readln;
end.