Вывести на экран значения всех элементов массива в обратном порядке - QBasic

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

Не понятна тема "Массивов" 3 задачи. Нужна помощь, кто умный, помогите плз! Буду ОЧЕНЬ благодарен! 1. Создать массив (размер 7). Заполнить его. Вывести на экран значения всех элементов массива в обратном порядке. 2. Дан целочисленный массив. Размер - N. Вывести на экран все нечетные числа. 3. Дан целочисленный массив. Размер - N. Вывести все нечетные числа в порядке возрастания.

Решение задачи: «Вывести на экран значения всех элементов массива в обратном порядке»

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

CLS : RANDOMIZE TIMER: s = 0
INPUT n
DIM a(n)
FOR x = 1 TO n
a(x) = INT(RND(1) * 10 - 3)
NEXT x
PRINT "IcxMas"
FOR x = 1 TO n
PRINT a(x);
NEXT x
PRINT
FOR x = 1 TO n
IF a(x) / 2 = INT(a(x) / 2) THEN s = s + 1 ELSE PRINT a(x);
NEXT x

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

CLS - команда очистки экрана.
RANDOMIZE TIMER - установка генератора случайных чисел.
s = 0 - инициализация счётчика.
INPUT n - запрос на ввод размера массива.
DIM a(n) - создание массива с заданным размером.
FOR x = 1 TO n - цикл по всем элементам массива.
a(x) = INT(RND(1) * 10 - 3) - генерация случайного числа и присвоение его элементу массива.
NEXT x - переход к следующему элементу цикла.
PRINTIcxMas` - вывод на экран строкиIcxMas`.
FOR x = 1 TO n - цикл по всем элементам массива.
PRINT a(x); - вывод на экран значения элемента массива.
NEXT x - переход к следующему элементу цикла.
FOR x = 1 TO n - цикл по всем элементам массива.
IF a(x) / 2 = INT(a(x) / 2) - проверка на чётность числа.
THEN s = s + 1 - увеличение счётчика, если число чётное.
ELSE PRINT a(x); - вывод на экран нечётного числа.
NEXT x - переход к следующему элементу цикла.
PRINT - завершающий вывод на экран.
FOR x = 1 TO n - цикл по всем элементам массива.
PRINT a(x); - вывод на экран значения элемента массива.