Fortran Coder

查看: 7232|回复: 2
打印 上一主题 下一主题

[数值问题] 求助!如何在程序中表达求和公式

[复制链接]

11

帖子

4

主题

0

精华

入门

F 币
79 元
贡献
41 点
跳转到指定楼层
楼主
发表于 2018-8-17 11:20:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
类似于求当i=(1,300),j=(1,300)时对h(i,j)进行求和

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

2033

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1642 元
贡献
709 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

沙发
发表于 2018-8-17 12:49:32 | 只看该作者
if( i==(1,300) .and. j==(1,300) ) then
  write(*,*) sum( h )
end if

835

帖子

2

主题

0

精华

大宗师

F 币
3926 元
贡献
2334 点
板凳
发表于 2018-8-17 16:15:37 | 只看该作者
如果h是二维数组且i, j 都是从1到300循环的话,求和 s=sum( h(1:300,1:300) )
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-27 10:30

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表