Nie je to chyba. Indexy môžu byť napr. znakové, ale prvky poľa zároveň môžu byť číselné.
Indexy môžu byť i záporné.
a: array[-10..-5] of string;
Miesto celočíselných indexov existujú aj znakové. Nasledujúca deklarácia je teda tiež správna:
b: array['a'..'n'] of integer;
Vymeneny string a integer....
Btw to readln je tam z pohladu pocitaca zbytocne, len pre uzivatela je na nieco :P
A ked uz:
Repeat until keypressed;
sa pouziva standartne pre crt kniznicu...
ak si taka mudra tak si to tam doplnis 
nechyba ti tam readln? na konci