Список целых представить в виде гистограммы - Prolog

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

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

Только начал изучать Prolog, прошу написать программу с объяснением Задача:Список, состоящий из целых чисел, иногда удобно представить в виде гистограммы. в следующем виде (предполагается, что числа в списке не слишком велики): ?– p([3,4,6,5]). *** **** ****** *****

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

textual
Листинг программы
hg([]).
hg([H | T]) :-
    H > 0,
    write("*"),
    H1 is H - 1,
    hg([H1 | T]).
hg([0 | T]) :-
    nl,
    hg(T).

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

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