BEGIN {
	# set field separator to commad ','
	FS=","
} 
/.*/ { 	
	cols=NF; 
	for(i=2; i<=NF; i++) { 
		sum[i] += $i; 
		sumsq[i] += $i*$i;
	} 
	count++; 
	print($0); 
} 
END { 
	printf("Moyenne");
	average = 0
	for(i=2; i<=cols; i++) {
		average = sum[i]/count;
		printf(", %.2f", average);
	}
	printf("\n");
	# commentaire
	printf("Ecart-type");
	for(i=2; i<=cols; i++) {
		average = sum[i]/count;
		variance = (sumsq[i] / count) - (average * average);	
		printf(", %.2f", sqrt(variance) );
	}
	printf("\n");  
}