Создать массив Y из элементов массива X, расположив сначала положительные, а потом отрицательные элементы - QBasic

Формулировка задачи:

сформулировать массив Y из элементов массива X(n), расположив сначала положительные, а потом отрицательные элементы. Вывести оба массива. Упорядочить массив X(n) по возрастанию. Вывести полученный массив. Исходный массив элеменетов получить с помощью датчика случайных чисел. Значения буквенных переменных задавать с клавиатуры. помагите плиззз)

Решение задачи: «Создать массив Y из элементов массива X, расположив сначала положительные, а потом отрицательные элементы»

Листинг программы

CLS
INPUT N
DIM Y(N), X(N)
RANDOMIZE TIMER
PRINT "X(N): "
FOR I = 1 TO N
        X(I) = INT(RND * 199) - 100
        PRINT X(I);
NEXT I
PRINT ""
PRINT "Y(N): "
FOR J = 1 TO N
        FOR I = 1 TO N - 1
                IF X(I) < X(I + 1) THEN SWAP X(I), X(I + 1)
        NEXT I
NEXT J
FOR I = 1 TO N
        Y(I) = X(I)
        PRINT Y(I);
NEXT I
 
PRINT ""
PRINT "X(N): "
 
FOR I = 0 TO N - 1
        IF I <= N / 2 THEN SWAP X(I), X(N - I)
        PRINT X(I);
NEXT I

Объяснение кода листинга программы

В первой строке используется команда CLS для очистки экрана.
Вторая строка запрашивает у пользователя ввод числа N, которое будет определять размер массива.
В третьей строке создаются два массива: Y и X, размером N.
В четвертой строке используется команда RANDOMIZE TIMER для случайной генерации чисел.
В пятой строке выводится сообщение X(N): и затем в цикле FOR I = 1 TO N генерируются и выводятся случайные числа в массив X.
После вывода всех чисел в массиве X выводится пустая строка.
В следующей строке выводится сообщение Y(N): и затем в цикле FOR J = 1 TO N для каждого элемента массива X выполняется сортировка по возрастанию в массиве X, а затем в цикле FOR I = 1 TO N элементы массива X копируются в массив Y.
После вывода всех чисел в массиве Y выводится пустая строка.
В следующей строке выводится сообщение X(N): и затем в цикле FOR I = 0 TO N - 1 выполняется сортировка по убыванию в массиве X, а затем выводятся элементы массива X.