diff options
author | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2021-08-27 18:13:37 +0200 |
---|---|---|
committer | Peter Mikkelsen <petermikkelsen10@gmail.com> | 2021-08-27 18:13:37 +0200 |
commit | 9ba8dae9508719aec8c319a0893276c20fdf7e12 (patch) | |
tree | 40c833363ea52cad4d2019dc3487b910306e0514 | |
parent | 5bea77b19aee5db8fb3b7c29c41402325adcb403 (diff) |
Problem 31
-rw-r--r-- | problem31.ijs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/problem31.ijs b/problem31.ijs new file mode 100644 index 0000000..f26696d --- /dev/null +++ b/problem31.ijs @@ -0,0 +1,10 @@ +pick =. dyad define + 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 |