Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.139.239.234] |
|
Сообщ.
#1
,
|
|
|
Привет всем!)
Есть задача: Найти сумму (N=1 до K) выражения X^N / N! Сделать нужно на Prolog 3.4 Как можно более просто. Написал правила для вычисления факториала, возведения X в степень Y, как теперь все это связать? Помогите пожалуйста. factorial(X,_):-X<0,!,fail. factorial(0,1):-!. factorial(N,Fact):- N1=N-1, factorial(N1, Fact1), Fact=N*Fact1. pow(X,0,1):-!. pow(0,X,0):-!. pow(X,1,X):-!. pow(X,Y,R):-Y1 is Y-1,s(X,Y1,R1), R is X*R1. s(1,X,1):-!. |