Определить количество ненулевых элементов списка - 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).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
