Помогите пожалуйста решить задачу на одномерный массив. Pascal
Одномерный массив Х(15) считать из файла*txt(файл создать самим).
Найти сумму отрицательных, количество положительных и произведение ненулевых элементов.
Заранее спасибо.