Произведение отрицательных элементов в векторе

double proizv(double* a,int n)
{int i;
 double p=1;
 for(i=0;i< n;i++)
	 if (a[i]< 0) p=p*a[i];
 return p;
}

Результат работы функции: