求教一个fortran问题

0