我试图在Prolog中做一个平均值的谓词,但是我遇到了一些问题,
它被称为平均值(N,X),其中N是数字,X是从1到N的平均值的结果.
我试过这样做,但它并不总是很好用:
average(1,1).
average(N,X) :- K is N-1 ,K>1 , average(K,S1) , X is /(+(S1,N),N).
average(N,X) :- K is N-1 ,K=:=1 , average(K,S1) , X is +(S1,N).
一些帮助 ？
prolog ×1