
![]() |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[216.73.216.3] |
![]() |
|
Сообщ.
#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):-!. |