простая задача на массив, девушке срочно требуется помощь Опции

[pusha]

помогите, пожалуйста, девушке-блондинке... )) ни разу не работала с массивами, а здесь придется... программа простая сама понимаю.., но вам же не сложно мне помочь и написать вот это: Даны целые числа а1,а2,...,аn, среди которых могут быть повторяющиеся. Составьте новый массив из чисел, взятых по одному из каждой группы равных членов данной последовательности. Очень прошу..., буду благодарна за любую помощь...

[pusha]

lapp и мисс_граффити еще раз огромное-преогромное спасибо за помощь!!! что не оставили на произвол... стыдно, конечно, но я вот стала разбираться в программах, вроде все поняла, кроме одного , объясните пожалуйста вот эту часть:
например, изначальный массив 1 2 4 5 2 5....,
первый повторяющийся элемент 2,
дойдя до него, получаем, что if (a[i]=a[j]) and (i<>j) это условие выполняется, а значит f1:=true;
далее в этом случае выполняется условие if f1 then
for j:=1 to kol do
if b[j]=a[i] then
f1:=false;
здесь непонятна строка for j:=1 to kol , ведь kol пока еще =0, и тогда цикл for j:=1 to 0 не выполниться ни разу? так что ли...?