#!/usr/bin/awk /\#/{ NR--; next; } { for (i = 1; i <= NF; i ++){ tab[i] += $i; tab2[i] += $i * $i; } } END{ if (NF == 0) printf("0\n"); else{ for (i = 1; i <= NF; i ++) printf("%f ", tab[i] / NR); printf("\n"); for (i = 1; i <= NF; i ++) printf("%f ", sqrt((tab2[i] - tab[i] * tab[i] / NR) / (NR - 1))); printf("\n"); } }