Количество положительных элементов Pascal

Условие задачи по программированию на Pascal: «Определить с помощью FUNCTION для каждого массива: количество положительных элементов. Первый массив: A(20); [-3;4] Второй массив: B(17); [-4;2]»

Заказ включает: 1. Постановку задачи 2. Блок-схему алгоритма решения задачи 3. Алгоритм решения задачи 4. Результат выполнения программы