Одномерный целочисленный массив из 7 ячеек заполнен случайными числами в диапазоне от 0 до 15, выводится на экран в столбик с указанием индекса элемента.

Найти среднее арифметическое тех элементов массива, которые больше 3 и меньше 7. Ответ выводится на экран


СОСТАВИТЬ ПРОГРАММУ НА ЯЗЫКЕ PASCAL!

Ноутбука с собой нет, поэтому проверить программу не могу, надеюсь, всё работает