Averages/Root mean square: Difference between revisions

m (→‎{{header|Sather}}: <= not > !)
Line 22:
6.204837
</pre>
 
=={{header|C}}==
<lang c>#include <stdio.h>
#include <math.h>
 
double rms(double *v, int n)
{
int i;
double sum = 0.0;
for(i=0; i < n;i++) sum += pow(v[i], 2);
return sqrt(sum / n);
}
 
int main()
{
double v[] = {1., 2., 3., 4., 5., 6., 7., 8., 9., 10.};
printf("%f\n", rms(v, sizeof(v)/sizeof(double)));
return 0;
}</lang>
 
=={{header|Clojure}}==