integer :: a , b
character(len=1) :: p
read( * , * ) a , p , b
fcode 发表于 2015-7-22 19:16
一般来说,能用 * 就用 * ,不用格式
[mw_shl_code=fortran,true]integer :: a , b
fcode 发表于 2015-7-22 22:12
因为表控格式(*)默认以空格或逗号做为数据的间隔
欢迎光临 Fortran Coder (http://bbs.fcode.cn/) | Powered by Discuz! X3.2 |