Programs made a long time for my study in fortran