Работа с матрицами, программа выдает неправильный результат

#include "stdafx.h"
#include "Header.h" 
#include <stdio.h>
#include <iostream>
#include <fstream>
#include <conio.h>
#include <memory> 
using namespace std;
 
 
int main(int argc, char** argv)
{
 
    int n;
    int m;
    FILE *res;
    res = fopen(argv[2], "wt");
    FILE *dat;
    dat = fopen(argv[1], "rt");
    fscanf(dat, "%d", &n);
    fscanf(dat, "%d", &m);
    double **a = (double**)sospam(n,m);
    proch(dat, n, m, a);
    fclose(dat);
 
    fprintf(res, "Количество строк : %d\n", n);
    fprintf(res, "Количество столбцов : %d\n", m);
    fprintf(res, "Матрица A:\n");
    pokaz(res, n, m, a);
    double sr;
    fprintf(res, "Среднее арифметическое матрицы %5.2lf\n", sr = sredn(n, m, a));
 
    if (NOT prover(n, m, a)) {
    fprintf(res, "Матрица А не содержит ни одного отрицательного элемента\n");
    fprintf(res, "Новая матрица\n");
    (n, m, a);
;
    for (int i = 0; i < n; i++)
    {
        for (int j = 0; j < m; j++)
            fprintf(res, "%3.1lf ", a[i][j]);
        fprintf(res, "\n");
    }
    }
    else
    fprintf(res, "Матрица содержит отрицательный элемент");
    udalit(n, a);
    fclose(res);
    return 0;
}

#include "stdafx.h" 
#include <conio.h>
#include <iostream>
#include <fstream>
#ifndef Source
#define Source
double** sospam(int n, int m);
void proch(FILE *dat, int n, int m, double **x);
void pokaz(FILE *res, int n, int m, double **x);
double sredn(int n, int m, double **a);
bool prover(int n, int m, double **a);
void nov(int n, int m, double **a);
void udalit (int n, double **&a);
#endif

#include "stdafx.h" 
#include <stdio.h> 
#include <locale.h>
#include "Header.h" 
 
double** sospam(int n, int m)
{
    double **x = new double *[n];
    for (int i = 0; i<n; i++)
        x[i] = new double[m];
    return x;
}
 
void proch(FILE *dat, int n, int m, double **x)
{
    for (int i = 0; i<n; i++)
        for (int j = 0; j<m; j++)
            fscanf(dat, "%5.3lf ", &x[i][j]);
    return;
}
 
void pokaz(FILE *res, int n, int m, double **x)
{
    for (int i = 0; i<n; i++) {
        for (int j = 0; j<m; j++)
            fprintf(res, "%3.2f ", x[i][j]);
        fprintf(res, "\n");
    }
    return;
}
 
double sredn(int n, int m, double **a)
{
    double sr = 0;
    for (int i = 0; i < n; i++)
    {
        for (int j = 0; j < m; j++)
            sr += a[i][j];
    }
    sr = sr / n*m;
    return sr;
}
 
bool prover(int n, int m, double **a)
{
    bool flag = false;
    for (int i = 0; i < n; i++) {
        for (int j = 0; j < m; j++)
            if (a[i][j] <0)
            {
                flag = true;
            }
    }
    return flag;
}
 
void nov(int n,int m, double **a )
{
        double sr = sredn(n, m, a);
        for (int i = 0; i < n; i++) {
            for (int j = 0; j < m; j++)
                a[i][j] = a[i][j] - sr;
        }
    return;
}
 
void udalit(int n, double **&a)
{
    for (int i = 0; i<n; i++)
        delete[] a[i];
    delete[] a;
    return;
}