Даны n-чисел, введённых случайным образом. Найти сумму и количество отдельно положительных и отрицательных чисел.
/////////////Pascal abc///////////////