e_711_03.f90

来自「Fortran77和90/95编程入门对应的程序源码」· F90 代码 · 共 8 行

integer h(5)
data h/5*0/
write(*,'(5i5)') h  !I/O列表中的数组
h=2
write(*,100) h(2:3) !I/O列表中的数组片段
100 format(2i3)
end