Sum=Number+Partial_sum.
Результат: Сумма ряда : 55
domains
number,sum=integer
predicates
Возможно вы искали - Курсовая работа: Конвертер программы с подмножества языка Си в Паскаль с использованием LL1 метода синтаксическог
sum(number,sum)
goal
write(“Суммаряда : “),
sum(2,sum), write(sum).
clauses
Похожий материал - Контрольная работа: Boot Record команды DOS Norton Commander Windows
sum(18,0).
sum(Number, Sum) :--
New_number=Number+2,
sum(New_number,Partial_sum),
Sum=Number+Partial_sum.
Очень интересно - Дипломная работа: Машинная память
Результат: Сумма ряда : 72
domains
number,sum=integer
predicates
sum(number,sum)
Вам будет интересно - Доклад: Компьютерные определители
goal
write(“Суммаряда : “),
sum(9,sum), write(sum).
clauses
sum(0,11).
Похожий материал - Статья: Основы работы в Internet
sum(Number, Sum) :--
New_number=Number-1,
sum(New_number,Partial_sum),
Sum=Number+Partial_sum