Работа с массивами Опции

[Negor]

Подскажите пожалуйста такое решение.
Есть некоторый массив.И из него нужно удалить элементы
меньшие какого либо значения
Например
1,3,5,4,3,1,8,6=array
удаляем все элементы меньше 5
получаем 5,8,6

[klem4]

Пользуйся поиском, решалось неоднократно

ps удаление к-го элемента

for i := k to n - 1 do arr[i] := arr[i+1];
n := n - 1;