求助！如何在程序中表达求和公式

selene

类似于求当i=（1,300），j=(1,300)时对h（i，j）进行求和

fcode

if( i==(1,300) .and. j==(1,300) ) then
  write(*,*) sum( h )
end if

li913

如果h是二维数组且i, j 都是从1到300循环的话，求和 s=sum( h(1:300,1:300) )