Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Arrays 如何知道Fortran数组中非零元素的数量？_Arrays_Fortran_Size - Fatal编程技术网
Fatal编程技术网
  • arrays/
  • Arrays 如何知道Fortran数组中非零元素的数量？

Arrays 如何知道Fortran数组中非零元素的数量？

arrays fortran

Arrays 如何知道Fortran数组中非零元素的数量？,arrays,fortran,size,Arrays,Fortran,Size,所以我有这样的想法： INTEGER i REAL value(10) DO i = 1,5 value(i) = 1 ENDDO 现在我的值=（1,1,1,1,0,0,0,0,0）。 给出size=5（不带零的数组大小）的函数是什么？只需计算非零元素 print *, count(value/=0) 拜托，这还不清楚。数组的大小始终为10。如果你指的是一个连续零件的尺寸，直到第一个零，请明确地说，甚至更好！谢谢

所以我有这样的想法：

INTEGER i
REAL value(10)

DO i = 1,5 
  value(i) = 1
ENDDO
现在我的值=（1,1,1,1,0,0,0,0,0）。
给出size=5（不带零的数组大小）的函数是什么？

只需计算非零元素

print *, count(value/=0)
拜托，这还不清楚。数组的大小始终为10。如果你指的是一个连续零件的尺寸，直到第一个零，请明确地说，甚至更好！谢谢