Форум программистов, компьютерный форум, киберфорум
Prolog
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 03.12.2013
Сообщений: 7

База содержит произвольные факты. Перепишите факты в обратном порядке

19.05.2015, 00:26. Показов 688. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Создать базу данных из начальной базы с учетом приведенных условий. Выполнить реализацию внешней базы данных, при этом результат поместить во внешний файл. При реализации внутренней базы данных результат выводится в окно выполнения Пролога.
DOMAINS
int=integer
list=integer*
file=out

DATABASE
dat2(int).

PREDICATES
print_outside().
reverse(list,list).
reverse(list,list,list).
rev(list).

CLAUSES
reverse(L,RL):-reverse(L,[],RL).
reverse([],Buf,Buf): - !.
reverse([H|T],Buf,RL):-reverse(T,[H|Buf],RL).

print_outside:-
consult("2-1.txt"),
write("Part2 Printing into the file."),
findall(X,dat2(X),L),
reverse(L,L2),openwrite(out,"2-2.txt"),
writedevice(out),rev(L2),closefile(out).

rev([H|T]):-write(H),nl,rev(T).
rev([]).

GOAL
print_outside.
по заданию ли я выполнил? Как я понял я вывожу не базу а список помогите исправить.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.05.2015, 00:26
Ответы с готовыми решениями:

Факты и пр. в ViP
Интересует вопрос, как в консольной программе ViP-а замутить например такое. нравится(джон, мэри). нравится(джон, анна). ...

Факты базы данных
Уважаемые знатоки Пролога! Подскажите, существует ли возможность работать с файлом базы данных в Прологе содержащей несколько сущностей или...

Собрать факты в список
Есть набор фактов в базе данных вида bone(integer,integer). Нужно собрать их в список вида . Можно ли это сделать с помощью стандартных...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
19.05.2015, 00:26
Помогаю со студенческими работами здесь

Добавьте в программу необходимые факты
Помогите сделать: (2) Даны результаты сдачи экзаменов для группы из пяти студентов: Фамилия Физика Информатика История ...

Как проверить все факты
Есть например факты like(tom, tennis) like(ann, tennis) like(bob, football) Как можно написать отношение, которое проверяет, ВСЕ ли...

Удалить все дублирующиеся факты с выводом соответствующих сообщений.
Помогите пожалуйста в написании проги, или хотябы растолкуйте задание...... Цель: описать логически реляционную базу данных. ...

В генеалог древе при построении его используя факты отец/2. мать/2. мужчина/1.повторяются решения
Дали вот такое задание на прологе создать генеалогическое дерево обладая следующими фактами отец/2. мать/2. мужчина/1. Больше ничего не...

Факты
1. Отсортировать спортсменов по весовой категории до 60 кг, 70 кг, 80 кг. Задание сделать пары для турнира, т.е. у кого вес до 60 кг они...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru