Add a fortran program for Problem 1.