所以我有这样的东西:
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(不带零的数组的大小)的函数是什么?
最佳答案
只计算非零元素
print *, count(value/=0)
关于arrays - 如何知道 Fortran 数组中非零元素的个数?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/43918465/