24小时热门版块排行榜    

查看: 831  |  回复: 5
本帖产生 1 个 程序强帖 ,点击这里进行查看
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

阿黛拉

银虫 (小有名气)

[求助] 如何实现第三列数的相加??

如何fortran实现Species 为M的charge列的相加(M的个数为变量)。
文本格式如下:

  Hirshfeld Analysis
     ------------------
Species   Ion     Hirshfeld Charge (e)
======================================
  N       1                -0.05
  N       2                -0.05
  M       1                -0.01
  M       2                -0.01
  M       3                 0.02
  M       4                 0.03
  M       5                -0.01
  M       6                -0.01
  M       7                 0.01
  M       8                 0.01
  M       9                -0.01
  M      10                 0.00
  M      11                 0.00
  M      12                 0.08
  M      13                -0.01
  M      14                -0.01
  M      15                -0.01
  M      16                -0.01
  M      17                 0.02
  M      18                -0.01
  M      19                -0.01
  M      20                 0.03
  M      21                -0.01
  M      22                -0.01
  M      23                -0.01
  M      24                 0.03
  M      25                 0.02
  M      26                -0.01
  M      27                -0.01
======================================
回复此楼
进退有度,才不至进退维谷;宠辱皆忘,方可以宠辱不惊。
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


感谢参与,应助指数 +1
jjdg(金币+1): 感谢参与 2012-01-14 00:07:50
用文本的方式读入一行,判断是不是 M 开头的,如果是读最后的那个数值,然后加和就可以了啊……

没有看懂那句“M的个数为变量”……
2楼2012-01-13 13:39:21
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 阿黛拉 的主题更新
信息提示
请填处理意见