Programa de arreglos unidimensionales en lenguaje c

DEFINICION DEL PROBLEMA:
SE REQUIERE UN PROGRAMA EN LENGUAJE C QUE MEDIANTE FUNCIONES CON PASO DE PARÁMETROS NOS PERMITA INTRODUCIR HASTA 40 ELEMENTOS NUMÉRICOS TIPO DOUBLE, MOSTRAR LOS DATOS ENRENGLONES DE 5 ELEMENTOS Y OBTENER EL PROMEDIO DE DICHOS VALORES.

PROGRAMA:
// ARREGLOS UNIDIMENSIONALES
// LECTURA Y ESCRITURA DE UN VECTOR Y CALCULO DEL PROMEDIO
//-----------------------------------------------------------
// Copia todo este programa y pégalo en un compilador de lenguaje c
// Funcionará correctamente. Cualquier duda:andres.rimo@hotmail.com

#include <math.h>#include <stdio.h>
#include <stdlib.h>
#include <conio.h>

// ---protitipos--------------
double promX(double *X, int n);
void lectX(double *X, int n, char);
void escrX(double*X, int n);

//===================================

int main(){
double v[40];
int n;
double prom;
printf("\n Promedio de elementos de un vector.\n\n");
printf("Numero de elementos : ");scanf("%d", &n);
if (n>40){
printf("\n Numero demaciado grande\n\n");
exit(1);
}
lectX(v, n, 'V');
printf(" VECTOR :\n");
escrX(v, n);

prom = promX(v,n);
printf(" promedio= %7.2lf\n", prom);
return 0;
}

// =========== definicion de las funciones ==============
void lectX(double *X, int n, char c){
// lectura de los elementos de un "vector".

int i;
for(i = 0; i < n; i++){
printf(" %c[%d] = ", c, i+1);
scanf("%lf", &X[i]);
}

}

double promX(double *X, int n){
// promedio de los elementos del 'vector' x

int i;
double s =0.0;
if (n <= 0 ){
printf(" promX: n = %d inadecuado\n", n);
return 0;
}
for(i = 0; i<n; i++)
s = s + X[i];

return s / n;
}

// -------------------------------------------void escrX(double *X, int n){
// escritura de los elementos de un vector

int i;
int nElementsLin = 5; // numero de elementos por linea

for(i = 0; i < n; i++){
printf("%7.2lf",...