program Zarins_1DT2_PD_14_Burbulis;

uses crt;

var
    a:Array [1..23] of String; {Nodefinē masīvu,
                                 kura elementu tips ir simbolu virkne}

begin
   {Masīva aizpildīšana}
   a[1] := 'Skutelis Kristiāns';
   a[2] := 'Poplavskis Antons';
   a[3] := 'Smalkais Kārlis';
   a[4] := 'Talu Roberts';
   a[5] := 'Mavrins Artjoms';
   a[6] := 'Krots Niks Verners';
   a[7] := 'Āboliņš Nils';
   a[8] := 'Nikass Lauris';
   a[9] := 'Šīmanis Ingvars';
   a[10] := 'Runcis Ivo';
   a[11] := 'Latsons Vladislavs';
   a[12] := 'Ramats Edijs';
   a[13] := 'Ziemels Rolands';
   a[14] := 'Plūcis Ernests';
   a[15] := 'Strautiņš Roberts Kristofers';
   a[16] := 'Zviedris Oskars Edgars';
   a[17] := 'Reinfelds Henrijs';
   a[18] := 'Grīnbergs Agris';
   a[19] := 'Veinbergs Toms';
   a[20] := 'Upenieks Dāvis';
   a[21] := 'Romaņenko Domeniks';
   a[22] := 'Kačanovs Aleksejs';
   a[23] := 'Jaško Andrejs';

   {Masīva kārtošana}



   {Sakārtota masīva parādīšana uz ekrāna}


   {Programmas pabeigšana}
   writeln('Nospied kādu taustiņu...');
   readkey;
end.