Определить количество ненулевых элементов списка - Prolog

Узнай цену своей работы

Формулировка задачи:

Определить количество ненулевых элементов списка. (Visual Prolog)

Решение задачи: «Определить количество ненулевых элементов списка»

textual
Листинг программы 
domains
int=integer
intl=int*
 
predicates
nz_count(intl,int)
 
clauses
nz_count([],0).
nz_count([H|T],N) :- H<>0, nz_count(T,N1), N=N1+1.
nz_count([H|T],N) :- H=0, nz_count(T,N).

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.375 из 5
Похожие ответы