Разность сумм положительных и отрицательных элем Pascal

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

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