Pascal - обработка одномерных массивов

[Russtein]

1) Составьте программу подсчета числа положительных элементов одномерного массива А(N),встречающегося в этом массиве более двух раз.

2) Составьте программу упорядочения (по увыванию) тех положительных элементов однеомерного массива А(N),что не встречаются в массиве В(М).

ребят, кому несложно решить выложите пожалуйста.


______________
Название темы по правилам форума должно адекватно отражать суть решаемой задачи/проблемы.
На первый раз я исправил.
В последующем, темы с подобным названием будут закрываться или удаляться,
а автор такой темы будет получать штрафные баллы.
Учтите это на будущее.

Модератор.