Помогите написать Пролог-программy нахождения количества ненулевых цифр в целом числе - Prolog
Формулировка задачи:
Помогите, пожалуйста, с частью контрольной.
Написать Пролог-программy нахождения количества ненулевых цифр в целом числе.
Решение задачи: «Помогите написать Пролог-программy нахождения количества ненулевых цифр в целом числе»
textual
Листинг программы
- predicates
- num_nzd(integer,integer)
- clauses
- num_nzd(0,0).
- num_nzd(N,1) :- N<10.
- num_nzd(N,K) :- N>=10,M=N mod 10, V=N div 10, num_nzd(V,K1), M>0, K=K1+1.
- num_nzd(N,K) :- N>=10,M=N mod 10, V=N div 10, M=0, num_nzd(V,K).
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д