数字平衡指数.ahk

; https://rosettacode.org/wiki/Equilibrium_index#AutoHotkey
Equilibrium_index(list, BaseIndex=0){
  StringSplit, A, list, `,
  Loop % A0 {
    i := A_Index	, Pre := Post := 0
    loop, % A0
      if (A_Index < i)
        Pre += A%A_Index%
      else if (A_Index > i)
        Post += A%A_Index%
    if (Pre = Post)
      Res .= (Res?", ":"") i - (BaseIndex?0:1)
  }
  return Res
}

list = -7, 1, 5, 2, -4, 3, 0
MsgBox % Equilibrium_index(list)

 

声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。