go to 语句用起来很混乱，而且一不小心就会出错，造成严重后果也是常有的事，为此才慢慢没人用了，要把这些语句改成fortran90的，你慢慢来了，用一些循环语句和条件语句改写，应该不是很难，但很繁琐！自己慢慢来了！随便说一句，不算回答！
goto语句不是必须的，可以用其它结构代替，上面的程序用if或者select case都可以。
