Anonymous user
Sum to 100: Difference between revisions
→{{header|Aime}}
No edit summary |
|||
Line 205:
=={{header|Aime}}==
<lang aime>
i = 1;
while (i < 512) {
b = i.bcount;
j = 0;
while (j < 1 << b) {
data e;
j += 1;
k = s = p = 0;
l = j;
z = 1;
while (k < 9) {
if (i & 1 << k) {
e.append(l & 1 ? '+' : '-');
s += p * z;
z = (l & 1) * 2 - 1;
l >>= 1;
p = 0;
}
e.append('1' + k);
p = p * 10 + 1 + k;
k += 1;
}
s += p * z;
if (s == 100 && e[0] != '+') {
o_(e, "\n");
}
}
i += 1;
}</lang>
{{Out}}
<pre>
123+4-5+67-89
12+3+4+5-6-7+89
12-3-4+5-6+7+89
1+23-4+5+6+78-9
1+2+3-4+5+6+78+9
-1+2-3+4+5+6+78+9
123+45-67+8-9
1+2+34-5+67-8+9
12+3-4+5+67+8+9
1+23-4+56+7+8+9
123-4-5-6-7+8-9</pre>
=={{header|ALGOL 68}}==
|