Предикат, вычисляющий произведение чисел от (N div 2) до N - Prolog
Формулировка задачи:
Помогите пожалуйста с программой.
Создать предикат, вычисляющий по натуральному числу N произведение чисел от (N div 2) до N.
Решение задачи: «Предикат, вычисляющий произведение чисел от (N div 2) до N»
textual
Листинг программы
- predicates
- prod(real,real,real)
- task(real,real)
- clauses
- prod(N,M,M) :- abs(M-N/2)<=0.000001, !.
- prod(N,M,K) :- M1=M-1, prod(N,M1,K1), K=K1*M.
- task(N,R) :- prod(N,N,R).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
