{Pascal} Ordenar Los Paises Con Mas Habitantes

[martin0290]

Hola gente, estoy empesando pascal porque estoy estudiando analista y bueno me dieron un ejercicio el cual me pide que ordene los países con mayor habitantes, yo hice lo siguiente:

Código:

program Paises;

        var
        p1:integer;
        p2:integer;
        p3:integer;
        p4:integer;
        p5:integer;
        p6:integer;
        p7:integer;
        p8:integer;
        p9:integer;
        p10:integer;
        p11:integer;
        p12:integer;
        p13:integer;
        p14:integer;



begin

writeln('Habitantes:');
writeln('');    {Espacio en blanco}
p1:=15000;      {Argentina}
p2:=40000;      {Brasil}
p3:=30000;      {Bolivia}
p4:=80000;      {Peru}
p5:=123000;     {Paraguay}
p6:=698456;     {Uruguay}
p7:=236987;     {España}
p8:=2001789;    {Francia}
p9:=277788998;  {Mexico}
p10:=44878989;  {Italia}
p11:=225589;    {Suiza}
p12:=225589;    {Australia}
p13:=22697;     {Alemania}
p14:=2587789;   {China}


writeln('Argentina: ', p1);
writeln('Brasil: ', p2);
writeln('Bolivia: ', p3);
writeln('Peru: ', p4);
writeln('Paraguay: ', p5);
writeln('Uruguay: ', p6);
writeln('España: ', p7);
writeln('Francia: ', p8);
writeln('Mexico: ', p9);
writeln('Italia: ', p10);
writeln('Suiza: ', p11);
writeln('Australia: ', p12);
writeln('Alemania: ', p13);
writeln('China: ', p14);

readln;


end.

Como tendria que decir para que me ordene los que tienen mas habitantes?

Saludos!