Equilibrium index: Difference between revisions
Content added Content deleted
m (Updated description and link for Fōrmulæ solution) |
(added ReScript) |
||
Line 2,304: | Line 2,304: | ||
{{out}} |
{{out}} |
||
<pre>(1 based) equ indices are: [4 7]</pre> |
<pre>(1 based) equ indices are: [4 7]</pre> |
||
=={{header|ReScript}}== |
|||
<lang ReScript>let arr = [-7, 1, 5, 2, -4, 3, 0] |
|||
let sum = Js.Array2.reduce(arr, \"+", 0) |
|||
let len = Js.Array.length(arr) |
|||
let rec aux = (acc, i, left, right) => { |
|||
if (i >= len) { acc } else { |
|||
let x = arr[i] |
|||
let right = right - x |
|||
if (left == right) { |
|||
let _ = Js.Array2.push(acc, i) |
|||
} |
|||
aux(acc, i+1, (left + x), right) |
|||
} |
|||
} |
|||
let res = aux([], 0, 0, sum) |
|||
Js.log("Results:") |
|||
Js.Array2.forEach(res, Js.log)</lang> |
|||
=={{header|REXX}}== |
=={{header|REXX}}== |
||
===version 1=== |
===version 1=== |