Question & Answer: QUESTION 3 20 (a) 17 Marks] Write a subroutine that receives from the main program a l of real variables and returns t…..

Subroutine of geometric mean:

Geometric mean computed with the formula (x_{1 *} x_{2 *} x_{3 *} x_{4 ………}x_n) ^1/n with using single dimensional (1-D) array size n real values as

double Mean_Geometric (double * array, int n) /* return result GM is real value and the arguments single                                                                             dimensional array and size n */

{

double GM,ProductArr = 1.0;

int i;

for(i=0; i<n; i++)

{

ProductArr=ProductArr * array[i];

}

GM = pow(ProductArr,(1.0/(double)(n)));/* geometric mean GM value is power of all

Product of 1-D elements    powered by (1/n) */

return GM;

}

Subroutine of Harmonic mean:

Harmonic mean computed with the formula n/(1/x₁ + 1/x₂ +1/x₃ ……..+1/x_n) with using single dimensional (1-D) array size n real values as

double Mean_Harmonic (double * array, int n) /* return result HM is real value and the

arguments single dimensional array and size n */

{

double HM = 0;

int i;

for(i=0; i<n; i++)

{

HM+=(1.0)/array[i];

}

HM = (double)(size)*pow(HM,-1.0);

return HM;

}