Эх, Руслан, я в тебя верил.
setlength(ar,s+1);
Изменяет верхнюю границу массива ar до s. Да, потому что при этой операции из второго аргумента вычитается 1.
ar[s]:=inttostr(i) и т.д.
Элементу s массива ar присваивается переведённая из целочислительного типа в строчный переменная i и т.д.