СРОЧНО!!! Решить в Pascal
1) Найти максимальный элемент массива, который больше 150. Известно, что значения элементов массива положительны и не превосходят 200.
2) Среднестатистическим назовем
элемент массива, если для него модуль разности его значения и среднего арифметического элементов массива достигает минимума. Найти среднестатистический элемент массива.
Заранее большое спасибо)