Помогите написать программу на PascalABC. Найдите положительные и отрицательные целые числа в заданном численном значении n и определите сумму абсолютных значений.