RosettaCodeData/Task/Equilibrium-index/Prolog/equilibrium-index-2.pro
2015-02-20 00:35:01 -05:00

4 lines
85 B
Prolog

?- equilibrium_index([-7, 1, 5, 2, -4, 3, 0], Index).
Index = 3 ;
Index = 6 ;
false.