Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Центр помощи > Помогите с решением задачки на Prolog'e


Автор: natasha92 3.10.2009, 20:46
Создайте предикат, вычисляющий по натуральному числу N сумму нечетных чисел, не превосходящих N.
ПОМОГИТЕ ПЛИЗ)))))))Я плохо знаю пролог!!!!ПОМОГИТЕ))))))))))

Автор: Грымзик 7.10.2009, 16:35
?- count(4,S), write(S).

nechetn(X):- Y is X//2, Z is Y*2+1, Z==X.

count(N, S):- (nechetn(N), sum(N,S)) ; (not(nechetn(N)), N1 is N-1, sum(N1,S)).

sum(1,1):- !.
sum(N,S):- N1 is N-2,sum(N1,S1), S is S1+N.


Автор: natasha92 12.10.2009, 14:04
Ты не можешь рассказать куда это вставлять(predicates,clauses).Я совсем не знаю пролог.

Автор: Void 12.10.2009, 14:14
В мусорку!
В ЦП!

Автор: mr.Anderson 12.10.2009, 19:39

 ! 
mr.Anderson
Модератор: название темы должно отражать ее суть!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)