Пример использования динамической базы данных (фактов) на языке Prolog

% Данный пример иллюстрирует хранение данных в динамической базе данных

% Цель задачи: ввести в БД 5 элементов, а затем их распечатать

database - maindb
 item(integer)        % элемент динамической БД


predicates

 nondeterm input(integer)           
 nondeterm print()

clauses

 % ввод I записей в БД
 input(0).
 input(I):- I > 0, readint(X), assert(item(X)), PrI = I - 1, input(PrI).


% распечатка записей БД
 print:- item(3), write(), write(" "), fail.


goal
 % retractall(item(_)), input(5), print.
 input(5), print.    % возможно работать не будет при повторном запуске программы!!!