Write a single program for Fortran that calculates the arithmetic mean (average), root-mean-square average, geometric mean, and harmonic mean for a set of positive numbers. Use any approach that you desire to read in the input values. Compare these values for each of the following sets of numbers:

(a) 4, 4, 4, 4, 4, 4, 4

(b) 5, 2, 3, 6, 3, 2, 6

(c) 4, 1, 4, 7, 4, 1, 7

d) 1, 2, 3, 4, 5, 6, 7