10 lines
192 B
Text
10 lines
192 B
Text
func[] equind a[] .
|
|
for v in a[] : sumr += v
|
|
for i to len a[]
|
|
sumr -= a[i]
|
|
if suml = sumr : r[] &= i
|
|
suml += a[i]
|
|
.
|
|
return r[]
|
|
.
|
|
print equind [ -7 1 5 2 -4 3 0 ]
|