Вычисление выражения - Prolog (227123)
Формулировка задачи:
Доброе утро всем) Помогите с предикатом для вычисления заданного выражения:
Решение задачи: «Вычисление выражения»
textual
Листинг программы
predicates s1(real,real) s2(real,real,real) clauses s1(1,0) :- !. s1(N,Z) :- N1=N-1, s1(N1,Z1), s2(N,N1,Q), Z=Z1+Q. s2(1,I,Q) :- Q=log(I) ,!. s2(N,I,Q) :- N1=N-1,s2(N1,I,Q1), Z=I*N, Q=log(Z)+Q1. goal s1(10,Q),write(Q),nl.