Найти первую цифру в десятичной записи трехзначного натурального числа - Prolog

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

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

Найти первую цифру в десятичной записи трехзначного натурального числа.))

Решение задачи: «Найти первую цифру в десятичной записи трехзначного натурального числа»

textual
Листинг программы
predicates 
 
first_dig(integer,integer)
 
clauses
 
first_dig(N,N) :- N<10, !.
first_dig(N,M) :- K=N div 10, first_dig(K,M).
 
goal
 
 first_dig(375,N).

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

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