Вывести те элементы массива, которые являются чётными числами - Free Pascal

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

Дан массив, состоящий из целых чисел. Напишите программу, которая выводит те элементы массива, которые являются чётными числами. Входные данные Сначала задано число N — количество элементов в массиве (1<=N<=100). Далее через пробел записаны N чисел — элементы массива. Массив состоит из целых чисел. Выходные данные Необходимо вывести все четные элементы массива (то есть те элементы, которые являются четными числами). Примеры входные данные 5 1 2 3 4 5 выходные данные 2 4 и еще напишите пожалуйста отдельно, как обозначить кол-во элементов в массиве?

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

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

For i:=1 to N do If not Odd(m[i]) then Writeln(m[i]);

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

В цикле for перебираются все элементы массива m от 1 до N.
Для каждого элемента выполняется проверка на чётность с помощью функции Odd(m[i]).
Если элемент является нечётным, то ничего не происходит.
Если элемент является чётным, то его значение выводится на экран с помощью функции Writeln(m[i]).