A-M baby

2013-04-10 21:29:02 -07:00 · 2013-04-10 21:29:02 -07:00 · db842d013d
commit db842d013d
parent 764da6cbbb
19005 changed files with 197040 additions and 7 deletions
--- a/Task/Knapsack-problem-Continuous/J/knapsack-problem-continuous-1.j
+++ b/Task/Knapsack-problem-Continuous/J/knapsack-problem-continuous-1.j
@ -0,0 +1,15 @@
+'names numbers'=:|:;:;._2]0 :0
+beef      3.8  36
+pork      5.4  43
+ham       3.6  90
+greaves   2.4  45
+flitch    4.0  30
+brawn     2.5  56
+welt      3.7  67
+salami    3.0  95
+sausage   5.9  98
+)
+'weights prices'=:|:".numbers
+order=: \:prices%weights
+take=: 15&<.&.(+/\) order{weights
+result=: (*take)#(order{names),.' ',.":,.take
--- a/Task/Knapsack-problem-Continuous/J/knapsack-problem-continuous-2.j
+++ b/Task/Knapsack-problem-Continuous/J/knapsack-problem-continuous-2.j
@ -0,0 +1,2 @@
+   +/prices * (take/:order) % weights
+349.378