fortran实习6