Fortran中数组中某些元素的总和答案

【问题标题】：Sum of certain elements in an array in FortranFortran中数组中某些元素的总和
【发布时间】：2020-09-24 04:31:15
【问题描述】：

我有一个这样的数组：

我想分别对每个 5 个元素求和，使用哪个函数以及如何使用？

【问题讨论】：

SUM 几乎可以肯定是你想要的，但你是在求和之后：元素 1 到 5，以及 6 到 10 等；元素 1 至 5、2 至 6、3 至 7 等；元素 1、6、11、16、21 和 2、7、12……等？
从 1 到 5，然后从 6 到 10，然后从 11 到 15，依此类推

标签： fortran gfortran

【解决方案1】：

您可以使用带步长的循环：

do i=1, N, 5

然后将内在函数 sum 应用于数组的切片：

sum (a(i: i+4))

【讨论】：

或者如果不介意数组副本，sum 与 dim= 和 reshape。

【解决方案2】：

一种可能的解决方案是：

do i=1,20,5                     
    x=0.0                 
    x=(sum(a(i:i+4)))
    write(*,*) x           
end do

【讨论】：