summaryrefslogtreecommitdiff
path: root/problem31.ijs
blob: 65a61f0c3c19fbe8ce18cc957ed5d751494b084a (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
pick =: {{
	if. 0=#y do.
		x=0
	else.
		coin =. {. y
		newCoins =. }. y
		+/([:pick&newCoins x-coin*])"0 i.>:<.x%coin
	end.
}}

problem31 =: 200 pick 200 100 50 20 10 5 2 1