Вводя последовательно 10 чисел из интервала (-15;10), подсчитать кол-во положительных чисел и среднее арифметическое отрицательных чисел.
Помогите составить программу на pascal, пожалуйста :)