Question

Помогите решить в паскале, пожалуйста.
2. Найти среднее арифметическое положительных элементов одномерного массива, состоящего из 18 элементов. Элементы заполняются числами от (-13 до 17).

3. Сформировать и вывести на экран массив, элементы которого заданы датчиком случайных чисел на интервале [-45, 47] (размер произвольный). Найти произведение элементов с четными номерами, которые превосходят некоторое число t.