Одномерный массив. Q basic - Построить новый массив из элементов исходного ,которые больше P.

[Marishkaa]

задание звучит так: в массиве из N элементов найти кол-во отрицательных элементов,минимальный элемент и его индекс. Построить новый массив из элементов исходного ,которые больше P.

я нашла минимальный элемент,количество отрицательных,индекс. а вот построить новый у меня не получаеться. Учитель сказал что надо найти количество элемнтов больше P и потом уже давать название новому массиву от одного до этого кол-ва... а вот что делать дальше чтото не могу сообразить.

[val_nnm]

Ну напиши свой пример а уж тогда я его тобе подправлю. А то последний раз на QBasic я писал лет этак 10 назад, его устанавливать и лезть в документацию неохота.

[Serebro]

num=0
for i=1 to n do
   if a(i)>p then
      num=num+1
      b(num)=a(i)
    end if
next i