小编Iri*_*eda的帖子

所以我有这样的事情：

INTEGER i
REAL value(10)

DO i = 1,5 
  value(i) = 1
ENDDO

所以现在我的值=（1,1,1,1,1,0,0,0,0,0）。给定size = 5（不带零的数组的大小）的函数是什么？