|
12 | 12 | myreverse([H | T], Result) :- myreverse(T, T1), append(T1, [H], Result). % attempt 3 |
13 | 13 |
|
14 | 14 | change(HalfDollars, Quarters, Dimes, Nickels, Pennies) :- |
15 | | - member(Nickels, [0, 1, 2, 3, 4, 5 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20]), |
16 | | - member(Dimes, [0, 1, 2, 3, 4, 5 6, 7, 8, 9, 10]), |
| 15 | + member(Nickels, [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20]), |
| 16 | + member(Dimes, [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10]), |
17 | 17 | member(Quarters, [0, 1, 2, 3, 4]), |
18 | 18 | member(HalfDollars, [0, 1, 2]), |
19 | 19 | SubTotal is ( (HalfDollars * 50) + (Quarters * 25) + (Dimes * 10) + (Nickels * 5) ), |
|
0 commit comments