Сформировать вектор из элементов

[kseenq]

Задан вектор A=(a1,...,an).
Сформировать вектор B=(b1,...,bm) из элементор ai(i=1 до n) вектора А, удовлетворяющих условию c=<ai=<d



Помогите, пожалуйста. Совсем еще "зеленая" в программировании:с

PascalABC

[type_Oleg]

 for i:=1 to n do 
    if (a[i]>=c)and(a[i]<=d)then

.. и т.д.

[kseenq]

Сообщение от type_Oleg

 for i:=1 to n do 
    if (a[i]>=c)and(a[i]<=d)then

.. и т.д.

не могли бы полностью написать?
буду премного благодарна