Одномерный массив Опции

[Merlin]

Помогите решить задачку :

Задан упорядоченный по невозрастанию одномерный массив.

1) Найти произведение отрицательных элементов массива;
2) Найти сумму положительных элементов массива;
3) Упорядоченный по невозрастанию массив преобразовать в упорядоченный по возрастанию, оставив по одному в каждой группе совпадающих элементов.

[Merlin]

Задан упорядоченный по невозрастанию одномерный массив

Это понимать как :

1.

 const
                          a: array [1..10] of integer =
                                  ('10', '9', '8', '7', '6', '5', '4', '3', '2', '1');

2. Или надо сначала задать массив, а потом упорядочить по невозрастанию ?