[Lost_Fish]

Есть такое понятие как динамический массив

Код:

var
    Ar:array of Integer

изначально его длинна не задана

Код:

SetLength(Ar,0)

устанавливает размер массива в данном случае - 0

Код:

SetLength(Ar,Length(Ar)+1)

добавляет один элемент в конец массива

работа с массивом также

Код:

Ar[i]:=i;

когда ты создаёшь массив Delphi только выделяет память из имеющейся свободной и ни кто не знает что было в этой памяти до того как она стала свободной, там могу быть нули а может быть и шлак всякий

Код:

SetLength(Ar,Length(Ar)-1)

это удалить последний элемент

функция

Код:

Length(Ar)

показывает длину массива

P.S. нумерация элементов динамического массива начинается с 0