Функция записи массива в функцию

#include <stdio.h>
#include <stdlib.h>
#include <time.h>
void file(int x,int y, int d)
{
FILE *m1;
  int i,j;
    for(i=0;i<x;i++)
    {  if(i==0)
     {
       m1=fopen("mode1.txt","w+");
     }
        for(j=0;j<y;j++)
        {
           fprintf(m1,"%4.1f ", d);
 
        }
       putc('\n',m1);
    }
     if(i==x && j==y)
     {
        fclose(m1);
     }
}
 
 
int main(void)
 
{
    srand(time(NULL));
  double *a;
  int n=10, m=10;
  a=(double*)malloc(n*m*sizeof(double));
  int i,j,k=0,sum=0;
  for(i=0;i<10;i++)
  {
      for(j=0;j<10;j++)
      {
          *(a+i*n+j)=rand()%100;
      }
      printf("\n");
  }
   for(i=0;i<10;i++)
  {
      for(j=0;j<10;j++)
      {
          printf("%.1f ",*(a+i*n+j));
        sum+=*(a+i*n+j);
       k+=1;
      }
 
      printf("\n");
  }
  printf(" %d",sum/k);
  file(m,n,*(a+i*n+j));
 
}

#include <time.h>
#include <stdio.h>
#include <stdlib.h>
 
void f_write (int *a, int rows, int columns, FILE *out)
{
    for (int i=0; i<rows; i++)
    {
        for (int k=0; k<columns; k++)
            fprintf(out, "%4d", a[i * columns + k]);
        fprintf(out, "\n");
    }
}
 
int main (void)
{
    srand( (unsigned)time(NULL)/2 );
    const int n=10, m=10;
    int *a = (int *)malloc(sizeof(int) * n*m);
    if (a == NULL)
    {
        fprintf(stderr, "Couldn't allocate memory\n");
        return 1;
    }
 
    int sum = 0;
    for (int i=0; i<n; i++)
    {
        for (int k=0; k<m; k++)
        {
            int index = i*m + k;
            printf("%4d", a[index] = rand()%100);
            sum += a[index];
        }
        puts("");
    }
    printf("avg = %.2lf\n", (double)sum/(n*m));
 
    FILE *fp = fopen("mode1.txt", "w");     // открываем файл для записи
    if (fp == NULL)
    {
        fprintf(stderr, "Couldn't open file\n");
        free(a);
        return 1;
    }
 
    f_write(a, n, m, fp);
    fclose(fp);
    free(a);
    return 0;
}