4-rings or 4-squares puzzle: Difference between revisions
m
→{{header|Picat}}: Added out tag
(→{{header|XPL0}}: Recursive solution.) |
m (→{{header|Picat}}: Added out tag) |
||
Line 4,188:
% Sums = $[A+B,B+C+D,D+E+F,F+G],
% foreach(I in 2..Sums.len) Sums[I] #= Sums[I-1] end,
LL = solve_all(L).</lang>
{{out}}
<pre>
Picat> main
Line 4,208 ⟶ 4,207:
[9,6,5,4,3,8,7]
len = 2860</pre>
=={{header|PL/SQL}}==
| |||