Prolog 成员谓词问题，兑换一美元

我在序言中完全是个书呆子。我正在做一项作业，在这里我创建了一个变化计数器，它可以以美分表示总的S，0你错过了美分！我建议使用/3之间来表示范围：

...,
between(0,100,Cents),
...,

...,
S is 50*H + 25*Q +10*D + 5*N + Cents,
...,

测试：

WRT error存在错误\u错误。。。我想你需要编译你的脚本

...,
between(0,100,Cents),
...,

...,
S is 50*H + 25*Q +10*D + 5*N + Cents,
...,

?- change(87,H,Q,D,N,Cents,P).
H = Q, Q = D, D = N, N = 0,
Cents = 87,
P = 13 ;
H = Q, Q = D, D = 0,
N = 1,
Cents = 82,
P = 13 ;