Find minimum number of coins that make a given value: Difference between revisions
Find minimum number of coins that make a given value (view source)
Revision as of 18:56, 12 September 2021
, 2 years ago→{{header|MiniZinc}}
Not a robot (talk | contribs) (Add APL) |
|||
Line 496:
(0, (1, 1))
</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>coins = {1, 2, 5, 10, 20, 50, 100, 200};
out = v /. ConvexOptimization[Total[v], coins . v == 988, v \[Element] Vectors[8, NonNegativeIntegers]];
MapThread[Row[{#1, " x ", #2}] &, {out, coins}] // Column</lang>
{{out}}
<pre>1 x 1
1 x 2
1 x 5
1 x 10
1 x 20
1 x 50
1 x 100
4 x 200</pre>
=={{header|MiniZinc}}==
Line 520 ⟶ 534:
Finished in 196msec
</pre>
=={{header|Nim}}==
<lang Nim>import strformat
| |||