Question

Реализовать процедуру или функцию, реализующую следующие операции над одномерными массивами. Написать программу, использующую данные алгоритмы.
!Работу пррограммы организовать в виде функций! -Язык Программирования(Pascal)
1. Заменить положительные элементы массива единицами, отрицательные – нулями, посчитать количество положительных и отрицательных элементов.
2.Вывести на экран номера положительных элементов массива и посчитать количество таких элементов.
3.Найти сумму и среднее арифметическое значение модулей нечетных элементов массива.
Сделайте хотя бы одно из трёх заданий! Буду благодарен!