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

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

помогите пожалуйста Задание 1: Дан целочисленный массив размера N. Вывести вначале все содержащиеся в данном массиве четные числа в порядке возрастания их индексов, а затем - все нечетные числа в порядке убывания их индексов. Задание 2: Дан целочисленный массив А размера 10. Вывести порядковый номер последнего из тех его элементов Аk, которые удовлетворяют двойному неравенству А1<Ak<A10. Если таких элементов нет, то вывести 0. Задание 3: Дан массив размера N. Обнулить все его локальные максимумы (то есть числа, больше своих соседей).

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

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

DIM a(n)
FOR i = 0 TO n 
IF (a(i) MOD 2 = 0) THEN PRINT a(n);"  ";
NEXT i
FOR i = n TO 0 STEP -1
IF NOT (a(i) MOD 2 = 0) THEN PRINT a(n);"  ";
NEXT i

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

Подготовительная часть кода:
- Объявляется массив a(n) с переменной n, которая представляет собой количество элементов в массиве.
- Задается начальное значение переменной i равное 0.
- Устанавливается флаг для печати значения переменной a(i) при условии, что a(i) делится на 2 без остатка.
Основной цикл:
- Используется цикл FOR для прохода по всем элементам массива от 0 до n.
- Проверяется условие: если остаток от деления a(i) на 2 равен 0, то это означает, что число четное, и оно выводится на экран вместе с символом пробела.
- Используется символ n для перехода на следующую строку.
Дополнительный цикл:
- Используется цикл FOR для прохода по всем элементам массива в обратном порядке от n до 0 с шагом -1.
- Проверяется условие: если остаток от деления a(i) на 2 не равен 0, то это означает, что число нечетное, и оно выводится на экран вместе с символом пробела.
- Используется символ n для перехода на следующую строку. Таким образом, в результате выполнения данного кода на экран будут выведены все четные числа из заданного массива в порядке возрастания их индексов.