Tja, met een kant-en-klare powerset wordt het wel heel triviaal.Raynman schreef op donderdag 17 december 2015 @ 11:27:
Dag 17 was wel erg kort:
Haskell:
1 main = interact $ show . length . filter ((150 ==) . sum) . subsequences . map read . lines
En deel twee is ook alleen maar een extra filter.
Ik ging in gedachten weer even terug naar 4 vwo en combinatoriek (7 ncr 3
code:
1
2
3
4
5
6
7
8
9
10
| var total = 0; var n = 20; for (int r = 1; r <= n; r++) { if (r == n) total += 1; else total += fact(n) / (fact(n - r) * fact(r)); } |
Mother north, how can they sleep while their beds are burning?