Implement the FORTRAN program belowThen, modify the program so that it outputs the number of A's, B's, C's, D's and F's. An A grade is any score that is at least 20% greater than the average. The B grade is any score that is not an A.ht is at least 10% greater than the average. An F grade is any score that is at least 20% less than the average. The D grade is any score that is not an E.hut is at least 10% less than the average. Any scores that are within 10% of the average (either less than or greater than) are C's d and will survive because it has turned out to be a remarkal useful part of a very vital commerce" (Wexelblat, 1981, p. 161) The following is an example of a Fortran 95 program ! Fortran 95 Example program Input: An integer, List Len, where List_ Len is less than 100, followed by List Len-Integer values ! Output: The number of input values that are greater than the average of all input values Implicit none Integer Dimension (99):: Int_List Integer :: ListLen, Counter, Sum, Average, Result Result 0 Sum0 Read , List Len If ((List Len > 0) .AND. (List Len Average is:', Result Print *'Error-list length value is not lega.l ! Print the result Else End If End Program Example