Паскаль. задача на массив

[narkozz]

задача...
Дан одномерный массив случайных чисел [1..30]... корчое я ввожу число N и мне надо чтоб все числа которые меньше этого числа N удалились из массива... не убрать с экрана, а удалить!

[chingiz]

Предположим имя массива M тогда
for i:=1 to 30 do
if M[i] < N then M[i]:=nil;

[pu4koff]

удалить элемент массива низя. Так что видимо надо хранить кол-во элементов в массиве (до удаления оно будет равно 30). ну и для удаления элемента смещаешь все элементы, что после него, на 1 к началу массива, т.е. a[i] := a[i+1] и при выводе на экран соответственно цикл будет не до 30, а до получившегося кол-ва элементов

[pu4koff]

Сообщение от Александр Чиндяев

Предположим имя массива M тогда
for i:=1 to 30 do
if M[i] < N then M[i]:=nil;

тогда нужно будет делать массив не чисел, а указателей на них