Произведение отрицательных элем. массива.(ошибка в коде)

#include <cstdio>
#include <conio.h>
#include <cmath>
 
 
//Подпрограмма - произведение отрицательных эллементов в заданном столбце
 
double function(double *A,int K,int i)
{
double proizv(1);
for (i=0; i<K; ++i)
if(A[i]<0)
proizv*=A[i];
return proizv;
}
int main ()
{
 
  double A[10000], X[100], res(0);
  int i,j, n, m;
 
  printf("Vvedite kol-vo strok matricy:\n");
  scanf("%d",&n);
  if( (n<=0)||(n>100))
  {
    printf ("Error!");                                                         //Размер указан не верно
    getch();
    return -1;
  }
  printf("Vvesti kol-vo stolbcov matricy:\n");
  scanf("%d",&m);
  if( (m<=0)||(m>100))
  {
    printf ("Error!");                                                         //Размер указан не верно
    getch();
    return -1;
  }
  printf ("Vvod elementov matricy:\n");                                       //Ввод матрицы
  for(i=0;i<n;++i)
  {
  for(j=0;j<m;++j)
  {
    printf("A[%d,%d]: ",i+1,j+1);
    scanf("%lf",&A[i*m+j]);
  }
  }
  printf("\nVvedennaya matrica A:\n");                                      //Вывод матрицы
      for (i = 0; i < n; ++i)
      {
          printf("[");
          for (j = 0; j < m; ++j)
          {
              printf(" %5.1f", A[i*m + j]);
 
          }
          printf(" ]\n");
      }
  printf ("\nProizvedenie otricatelnyh ellementov v zadanom stolbce :\n ");    //Результат вычисления подпрограммой
  for(i=0;i<m;++i)
  {
    X[i]=function(A,m,i);
    printf(" %4.1lf", X[i] );
  }
  for(i=0;i<m;++i)
  res+=pow(X[i]-X[m-1-i],2);
  printf("\nResult = %0.2lf", res);
  getch();
  return 0;
}