Реферат: Разработка информационно-справочной системы

⚡ 👉🏻👉🏻👉🏻 ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻

по дисциплине
“Логическое
программирование”

студенту
Пакостиной
Александре
Викторовне.
Тема
исследования :
“Разработка
информационно
- справочной
системы”.
Исходные
данные :
База данных
BD ,
включающая
записи вида:
Перечень
вопросов, подлежащих
разработке :
Разработать
меню, обеспечивающее
взаимодействие
пользователя
с системой, в
соответствии
с заданием,
предусмотрев
режимы:

3.3.
Предусмотреть
создание из
базы BD
новых баз данных
B1,
B2,
характеризуемых
признаками,
задаваемыми
пользователем.
Перечень
графических
материалов: 4.1.
Структурная
схема меню:
Календарный
план работы
над курсовой
работой:
Анализ
задания, постановка
задачи, подбор
и изучение
литературы:
18.10.96 .
Разработка
меню и структуры
программы:
25.10.96 .
Разработка
процедур
информационно-справочной
системы: 15.11.96 .
Оформление
пояснительной
записки и сдача
работы на правку:
13.12.96 .

Руководитель :
Холкин И.И.
­­____________

Студент :
Пакостина А.В.
____________
Понятие
об информационно-справочных
системах и их
программная
реализация. Информационно-справочные
системы предназначены
для управления
различными
информационными
и справочными
массивами, в
число которых
входят и базы
данных. Эти
системы организовывают
определенный
интерфейс
пользователя
с функциями
обработки
информации
самой системы.
Набор возможностей
таких систем
обычно включает
в себя коррекцию
структуры
используемого
объекта (инкапсулирующего
информацию),
работа с его
составляющими
- дополнение,
редактирование,
удаление (в
случае, когда
роль такого
объекта выполняет
база данных,
это - записи),
простой просмотр,
поиск элементов.
Также необходимо
обеспечить
для такой системы
и функции
постоянного
надежного
хранения - в
простейшем
случае, это -
запись базы
из памяти в
файл на диске
и считывание
оного с диска
в память. Программная
реализация
мало отличается
от подобной
концепции, но
конкретизирует
абстрактные
операции в
конкретные
процедуры и
функции (или
же объекты) и
зависит полностью
от возможностей
языка, поставленной
задачи и искусства
программиста.
Базы
данных и способы
их представления. Общая
концепция
теории простых
баз данных
подразумевает
наличие некоторого
множества
таблиц и являющихся,
собственно,
базой данных,
имеющей определенный
идентификатор
(имя). Каждая
таблица состоит
из n-го
количества
записей (величина
n
зависит от
возможностей
конкретной
системы), каждая
из которых
имеет одну и
ту же структуру
(в рамках одной
таблицы) и может
объединять
в себе несколько
разнородных
объектов (их
количество
также зависит
целиком и полностью
от возможностей
системы). Работа
с базой данных
предполагает
в себе возможность
работать с
записями (либо
изменять структуру
таблиц). В языке
программирования
Пролог база
данных описывается
в отдельном
разделе, именуемом
database .
Таких разделов
может быть
несколько в
одной программе
и каждый из
них, если они
действительно
представляют
собой разные
БД, должны иметь
разные имена.
В случае отсутствия
имени у базы
данных, ей дается
имя по умолчанию
- dbasedom . Работу
с загружаемыми
базами данных
в Прологе реализуют
следующие
стандартные
предикаты:
assert
- добавить запись
в БД, retract
-
удалить указанную
запись, save
- сохранить
указанную БД
в файле, consult
- загрузить БД
из файла в память. В
данной работе
объявлена
главная база
данных bd ,
имеющая предикат
characteristick ,
и две временные
базы b1,
b2 с
предикатами
table1,
table2 .
Разработка
системного
меню. Системное
меню объединяет
в себе доступ
ко всем процедурам
информационно
- справочной
системы. Разработка
меню отталкивается
от имеющихся
функций системы
(предикатов).
Поскольку
объявлен предикат
do
(char) ,
служащий буфером
между системным
меню и существующими
процедурами,
он имеет в себе
либо подменю
с выбором режимов
работы имеющихся
предикатов,
либо их вызов
с последующим
возвратом в
системное
меню: +--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
5 :- Удалить запись
по признакам
¦
¦
------------------| |------------------ ¦
+--------------------------------------------+

Разработка
структуры
программы. Системное
меню вызывает
только предикаты
do
(<режим>),
определенные
для каждой из
необходимых
задач (номер
режим полностью
совпадает с
нумерацией
в главном меню).
Каждая из реализаций
этого предиката
выводит меню,
либо сразу
вызывает
соответствующие
процедуры:
open,
store, adding, correct, see, del, indication .
Процедура
Indication
выводит дополнительное
подменю и вызывает
либо IndicationB1 ,
либо
IndicationB2
в зависимости
от выбора
пользователя.
Do(‘8’)
завершает
работу с системой.
Загрузка
базы данных
( Open ). В
do(‘1’)
имеется меню: +---------
Загрузить
--------+
+----------------------------+ процедура
Open
имеет четыре
реализации,
для каждого
из вариантов
работы. Для
любого случая
перед загрузкой
базы данных
проверяется
существование
файла с введенным
именем (предикат
exists ).
Для загрузки
базы данных
используется
стандартный
предикат consult .
При вызове
Open(‘1’)
загрузка
производится
в базу bd ,
при вызове
Open(‘ 2 ’)
в
базу b1 ,
при вызове
Open(‘3’)
-
в
b2 .
Сохранение
( Store ) . В
do(‘2’)
меню:
+----------------------------+ Существуют
предикаты для
записи главной
базы и двух
временных.
Используется
стандартный
предикат save ,
записывающий
в текстовый
файл факты,
связанные с
данной БД.
+----------------------------+ Предложения
See(‘1’)
и
See(‘2’)
создают новые
окна и выводят
в них найденные
записи. После
каждой выведенной
записи запрашивается
нажатие клавиши,
затем повторяется
поиск с помошью
стандартного
предиката Fail
или происходит
выход из предиката
в системное
меню.
Добавление
( Adding) . Данный
предикат был
добавлен в
программу по
причине облегчения
работы с ней,
хоть и в задании
его не было. В
этой процедуре
используется
определенная
в этой же программе
процедура Get ,
запрашивающая
с клавиатуры
значения для
новой записи
в главной базе
данных и стандартная
процедура
assert ,
добавляющая
новый факт в
базу данных.
Корректировка
( Correct) . В
данной программе
существует
два варианта
корректировки
- редактирование
записи, найденной
по номеру артикула
и найденной
по названию
детали. В каждой
из версий предиката
вначале запрашивается
номер артикула
(или название)
изменяемой
записи, поиск
и вывод на экран,
затем происходит
ввод новых
значений полей,
подтверждаются
сделанные
изменения,
удаляется
старый факт
( retract )
и добавляется
вновь сформированный
( assert ).
Создания
базы по признакам
( Indication) . Indication(‘1’)
создает
базу b1 ,
а Indication(‘2’)
- базу b2 .
Для каждой
базы существует
отдельный
предикат -
IndicationB1
и
IndicationB2 .
Существуют
возможности
создания таких
баз по следующим
признакам: по
месту хранения,
по цене, по дате
поступления.
В каждом из
вариантов
производится
запрос на несколько
параметров
сразу и поиск
фактов, отвечающих
этим требованиям.
При успешном
поиске, найденный
факт добавляется
в базу b1
или
b2 .
Удаление
записи по признакам
( Del). Признаками
для удаляемой
записи могут
служить номер
артикула, название,
а также возможно
уничтожить
из памяти всю
базу данных.
Во
всех вариантах
используется
процедура
удаления записи
retract .

6.
Листинг.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%

%

%
Пакостина
Александра.
%

%
ИР-1-95.
%

%
Задание 11.
%

%

%


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

characteristick(artikul,
placedom, name, pricedom, datedom)

table1(artikul,
placedom, name, pricedom, datedom)

table2(artikul,
placedom, name, pricedom, datedom)

show(artikul,
placedom, name, pricedom, datedom)

get(artikul,
placedom, name, pricedom, datedom)

characteristick(1,place(5,6),"Gayka",price(0,45),date(1996,1,4)).

characteristick(2,place(6,7),"Vint",price(0,65),date(1996,2,45)).

write("
Система
управления
базой данных
\"Характеристика
детали\""),

makewindow(3,112,1,"
Системное меню
",2,17,14,46),

nl,
write(" Выберите
вариант работы
с базами данных:"),
nl,

nl,
write(" 4 :- Скорректировать"),

nl,
write(" 5 :- Удалить
запись по
признакам"),

nl,
write(" 6 :- Создать
по признакам"),

nl,
write(" ------------------| |------------------"),

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(4,18,1,"
Загрузить
",5,25,10,30),

nl,
write(" Куда загрузить
?"), nl,

makewindow(4,18,1,"
Сохранить
",5,25,10,30),

cursor(7,13),
readchar(X), store(X),

makewindow(4,18,1,"
Просмотреть
",5,25,10,30),

makewindow(4,18,1,"
Корректировка
",5,25,9,30),

write("
Способ нахождения
записи: "), nl,

nl,
write(" 1 :- по номеру
артикула"),

cursor(6,13),
readchar(X), correct(X),

makewindow(4,18,1,"
Удаление записи
по признаку
",5,25,10,30),

makewindow(4,18,1,"
Создать базу
по признаку
",5,25,9,30),

write("
Какую базу
создать ?"), nl,

cursor(6,13),
readchar(X), indication(X),

makewindow(4,18,1,"
Добавить запись
к главной базе
",7,10,13,60),

makewindow(4,95,1,"Запрос",10,29,5,22),
nl,

write("
Выйти ? (Yes/No)"), readchar(X),

makewindow(4,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,95,1,"Загрузка
bd",7,20,10,40),

nl,
write(" Загружено"),
readchar(_), removewindow, !.

makewindow(5,95,1,"Загрузка
b1",7,20,10,40),

nl,
write(" Загружено"),
readchar(_), removewindow, !.

makewindow(5,95,1,"Загрузка
b2",7,20,10,40),

nl,
write(" Загружено"),
readchar(_), removewindow, !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('1').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,95,1,"Сохранение
bd",7,20,10,40),

write("
Имя файла : "),
readln(FN), save(FN, bd),

nl,
write(" Сохранено"),
readchar(_), removewindow, !.

makewindow(5,95,1,"Сохранение
b1",7,20,10,40),

nl,
write(" Сохранено"),
readchar(_), removewindow, !.

makewindow(5,95,1,"Сохранение
b2",7,20,10,40),

nl,
write(" Сохранено"),
readchar(_), removewindow, !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('2').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,95,1,"
Просмотр bd
",7,10,9,60),


characteristick(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

show(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

nl,nl,write("Нажмите
ENTER для продолжения..."),

removewindow,
removewindow, do('3'), !.

makewindow(5,95,1,"
Просмотр b1
",7,10,9,60),

table1(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

show(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

nl,nl,write("Нажмите
ENTER для продолжения..."),

removewindow,
removewindow, do('3'), !.

makewindow(5,95,1,"
Просмотр b2
",7,10,9,60),

table2(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

show(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

nl,nl,write("Нажмите
ENTER для продолжения..."),

removewindow,
removewindow, do('3'), !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('3').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,95,1,"
Корректировка
записи, найденной
по артикулу
",7,10,13,60),

write("Номер
артикула: "),
readint(X),


characteristick(X,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

show(X,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),
nl, nl,

write("Введите
новый вариант:"),
nl, nl,


get(ArtD,place(NCD,NSD),NameD,price(RubD,KopD),date(YearD,MonD,DayD)),
nl,


retract(characteristick(X,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day))),


assert(characteristick(ArtD,place(NCD,NSD),NameD,price(RubD,KopD),date(YearD,MonD,DayD))),

removewindow,
removewindow, do('4'), !.

removewindow,
removewindow, do('4'), !.

makewindow(5,95,1,"
Корректировка
записи, найденной
по названию
",7,10,13,60),


characteristick(Art,place(NC,NS),X,price(Rub,Kop),date(Year,Mon,Day)),

show(Art,place(NC,NS),X,price(Rub,Kop),date(Year,Mon,Day)),
nl, nl,

write("Введите
новый вариант:"),
nl, nl,


get(ArtD,place(NCD,NSD),NameD,price(RubD,KopD),date(YearD,MonD,DayD)),
nl,


retract(characteristick(Art,place(NC,NS),X,price(Rub,Kop),date(Year,Mon,Day))),


assert(characteristick(ArtD,place(NCD,NSD),NameD,price(RubD,KopD),date(YearD,MonD,DayD))),

removewindow,
removewindow, do('4'), !.

removewindow,
removewindow, do('4'), !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('4').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,95,1,"
Удаление по
артикулу
",7,20,10,40),

write("
Номер артикула:
"), readint(X),


retract(characteristick(X,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day))),
nl,

removewindow,removewindow,
do('5'), !.

makewindow(6,76,1,"Ошибка",8,29,5,22),

write("
Запись не найдена."),
readchar(_),

removewindow,
removewindow, removewindow, do('5').

makewindow(5,95,1,"
Удаление по
названию
",7,20,10,40),


retract(characteristick(Art,place(NC,NS),X,price(Rub,Kop),date(Year,Mon,Day))),
nl,

removewindow,removewindow,
do('5'), !.

makewindow(6,76,1,"Ошибка",8,29,5,22),

write("
Запись не найдена."),
readchar(_),

removewindow,
removewindow, removewindow, do('5').

makewindow(5,95,1,"
Удаление всей
базы ",7,20,10,40),

retract(characteristick(_,place(_,_),_,price(_,_),date(_,_,_))),

write("
База удалена."),
readchar(_),

removewindow,removewindow,
do('5'), !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('5').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(5,18,1,"
Создать базу
B1 по признаку
",8,25,10,30),

nl,
write(" 1 :- По месту
хранения"),

nl,
write(" 3 :- По дате
поступления"),

cursor(7,13),
readchar(X), indicationB1(X),

removewindow,
removewindow, do('6'), !.

makewindow(5,18,1,"
Создать базу
B2 по признаку
",8,25,10,30),

nl,
write(" 1 :- По месту
хранения"),

nl,
write(" 3 :- По дате
поступления"),

cursor(7,13),
readchar(X), indicationB2(X),

removewindow,
removewindow, do('6'), !.

makewindow(5,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, do('6').

makewindow(6,95,1,"
Создание базы
B1 по месту хранения
",7,20,10,40),

write("
Номер склада:
"), readint(Y),


characteristick(Art,place(X,Y),Name,price(Rub,Kop),date(Year,Mon,Day)),


assert(table1(Art,place(X,Y),Name,price(Rub,Kop),date(Year,Mon,Day))),

removewindow,
removewindow, indication('1').

makewindow(6,95,1,"
Создание базы
B1 по цене ",7,20,10,40),


characteristick(Art,place(NC,NS),Name,price(X,Y),date(Year,Mon,Day)),


assert(table1(Art,place(NC,NS),Name,price(X,Y),date(Year,Mon,Day))),

removewindow,
removewindow, indication('1').

makewindow(6,95,1,"
Создание базы
B1 по дате поступления
",7,20,10,40),


characteristick(Art,place(NC,NS),Name,price(Rub,Kop),date(X,Y,Z)),

assert(table1(Art,place(NC,NS),Name,price(Rub,Kop),date(X,Y,Z))),

removewindow,
removewindow, indication('1').

makewindow(6,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, indication('1').

makewindow(6,95,1,"
Создание базы
B2 по месту хранения
",7,20,10,40),

write("
Номер склада:
"), readint(Y),


characteristick(Art,place(X,Y),Name,price(Rub,Kop),date(Year,Mon,Day)),


assert(table2(Art,place(X,Y),Name,price(Rub,Kop),date(Year,Mon,Day))),

removewindow,
removewindow, indication('2').

makewindow(6,95,1,"
Создание базы
B2 по цене ",7,20,10,40),


characteristick(Art,place(NC,NS),Name,price(X,Y),date(Year,Mon,Day)),


assert(table2(Art,place(NC,NS),Name,price(X,Y),date(Year,Mon,Day))),

removewindow,
removewindow, indication('2').

makewindow(6,95,1,"
Создание базы
B2 по дате поступления
",7,20,10,40),


characteristick(Art,place(NC,NS),Name,price(Rub,Kop),date(X,Y,Z)),

assert(table2(Art,place(NC,NS),Name,price(Rub,Kop),date(X,Y,Z))),

removewindow,
removewindow, indication('2').

makewindow(6,76,1,"Ошибка",8,29,5,22),

write("
Выберите из
меню"), readchar(_),

removewindow,
removewindow, indication('2').

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

get(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)),

nl,
show(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)), nl,

nl,
write(" Добавить
? (Yes/No)"), readchar(A),


assert(characteristick(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day)));

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

makewindow(6,76,1,"Ошибка",10,25,5,30),
nl,

removewindow,
removewindow, do('1').

show(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day))
:-

write("
Артикул
: ",Art),

nl,
write(" Местоположение
(Цех, Склад) :
",NC,", ",NS),

nl,
write(" Наименование
товара : ",Name),

nl,
write(" Стоимость
(Рублей:Копеек)
: ",Rub,":",Kop),

nl,
write(" Дата поступления
(Год-Месяц-День)
: ",Year,"-",Mon,"-",Day).

get(Art,place(NC,NS),Name,price(Rub,Kop),date(Year,Mon,Day))
:-

write("
Артикул
: "), readint(Art),

write("
Местоположение
: "), nl,

write("
Цех : "),
readint(NC),

write("
Склад : "),
readint(NS),

write("
Наименование
товара : "),
readln(Name),

write("
Стоимость
: "), nl,

write("
Рублей
: "), readint(Rub),

write("
Копеек
: "), readint(Kop),

write("
Дата поступления
: "), nl,

write("
Год : "),
readint(Year),

write("
Месяц : "),
readint(Mon),

write("
День : "),
readint(Day).
Отладка
программы. Открытие
БД. +--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+--------- Загрузить
--------+ ¦
¦
+--------------Загрузка
bd-------------+ ¦

+--------------------------------------+ Сохранение
БД. +--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+--------- Сохранить
--------+ ¦
¦
+-------------Сохранение
b2------------+ ¦

+--------------------------------------+ Просмотр.
+--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+-------- Просмотреть
-------+ ¦
¦
2 :-¦ Что просмотреть
? ¦ ¦
+-----------------------
Просмотр bd
----------------------+
¦
Артикул
: 2 ¦
¦
Местоположение
(Цех, Склад) :
6, 7 ¦
¦
Наименование
товара : Vint
¦
¦
Стоимость
(Рублей:Копеек)
: 0:65 ¦
¦
Дата поступления
(Год-Месяц-День)
: 1996-2-45 ¦
¦Нажмите
ENTER для продолжения...
¦
+----------------------------------------------------------+ Корректировка.
+--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+------- Корректировка
------+ ¦
¦
2 :-¦ Способ нахождения
записи: ¦ ¦
+-------
Корректировка
записи, найденной
по названию
------+
¦Старая
запись:
¦
¦
Артикул
: 1 ¦
¦
Местоположение
(Цех, Склад) :
5, 6 ¦
¦
Наименование
товара : Gayka
¦
¦
Стоимость
(Рублей:Копеек)
: 0:45 ¦
¦
Дата поступления
(Год-Месяц-День)
: 1996-1-4 ¦
¦Введите
новый вариант:
¦
+----------------------------------------------------------+ Удаление. +--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+ Удаление
записи по признаку+
¦
¦
+-------- Удаление
по артикулу
--------+ ¦

+--------------------------------------+ Создание
по признакам. +--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
¦
1 :-+- Создать базу
по признаку
-+ ¦
¦
2 :-¦ Какую базу
создать ? ¦
¦
¦
+------ Создание
базы B1 по цене
------+ ¦

+--------------------------------------+

+----------------------------+ Добавление.
+--------------
Системное меню
--------------+
¦
Выберите вариант
работы с базами
данных: ¦
+-------------
Добавить запись
к главной базе
-------------+
¦
Местоположение
: ¦
¦
Склад : 6
¦
¦
Наименование
товара : Shayba
¦
¦
Стоимость
: ¦
¦
Рублей
: 1 ¦
¦
Копеек
: 2 ¦
¦
Дата поступления
: ¦
¦
Год : 1996
¦
¦
Месяц : 23
¦
¦
День : 3
¦
+----------------------------------------------------------+
Инструкция
пользователя
и решение
контрольных
примеров. Решение
контрольных
примеров
основывается
на том, что было
сделано в отладке
программы и
может быть
изучено по
вышестоящей
части (7.). Для
работы с программой
необходимо
выбирать из
предлагаемых
меню пункты
путем нажатия
на соответствующие
цифры. При
появлении
подменю повторить
операцию, при
запросе на
имя файла - ввести
строку, определяющую
имя файла, при
запросе на
символ, нажать
соответствующую
клавишу на
клавиатуре
(не забывайте,
пожалуйста
об языковой
раскладке
клавиатуры
и состоянии
клавиши CAPSLOCK).
Также в нескольких
процедурах
производится
подтверждение
(Yes/No
- Да/Нет)
- необходимо
переключиться
на английскую
раскладку и
нажать соответствующую
клавишу в нижнем
регистре.
Заключение. Язык
программирования
Пролог безусловно
может быть
использован
для написания
подобных
информационно-справочных
систем, так
как он позволяет
легко и быстро
создавать
логические
запросы к базам
данных, что
безусловно
выделяет его
среди остальных
языков программирования.


Список
литературы. 1.
К.
Кларк.
“Введение
в логическое
программирование
на Micro
Prologe ”. 2.
К.
Хоггер.
“Введение
в логическое
программирование”.

ГОСУДАРСТВЕННЫЙ
КОМИТЕТ РОССИЙСКОЙ
ФЕДЕРАЦИИ

РАДИОТЕХНИКИ,
ЭЛЕКТРОНИКИ
И АВТОМАТИКИ

Тема:
“Разработка
информационно
- справочной
системы”

по дисциплине
“Логическое
программирование”.

Руководитель :
доцент
кафедры Холкин
Игорь Иванович

Название: Разработка информационно-справочной системы
Раздел: Рефераты по информатике, программированию
Тип: реферат
Добавлен 09:29:46 16 августа 2005 Похожие работы
Просмотров: 1705
Комментариев: 17
Оценило: 4 человек
Средний балл: 5
Оценка: неизвестно   Скачать

Срочная помощь учащимся в написании различных работ. Бесплатные корректировки! Круглосуточная поддержка! Узнай стоимость твоей работы на сайте 64362.ru
Если Вам нужна помощь с учебными работами, ну или будет нужна в будущем (курсовая, дипломная, отчет по практике, контрольная, РГР, решение задач, онлайн-помощь на экзамене или "любая другая" учебная работа...) - обращайтесь: https://clck.ru/P8YFs - (просто скопируйте этот адрес и вставьте в браузер) Сделаем все качественно и в самые короткие сроки + бесплатные доработки до самой сдачи/защиты! Предоставим все необходимые гарантии.
Привет студентам) если возникают трудности с любой работой (от реферата и контрольных до диплома), можете обратиться на FAST-REFERAT.RU , я там обычно заказываю, все качественно и в срок) в любом случае попробуйте, за спрос денег не берут)
Да, но только в случае крайней необходимости.

Реферат: Разработка информационно-справочной системы
Егэ История Эссе Периоды
Дипломная Работа На Тему Оценка Эффективности Управленческого Выбора
Анализ судебного разбирательства гражданских дел
Реферат На Тему Использование Солнечной Энергии
Доклад: Опpеделение обеспеченности выпуска долговых обязательств пpедпpиятия его собственным имуществом
Реферат: Амнистия и помилование 4
Крепостное Право Реферат
Курс Лекций На Тему Внутренний Экономический Механизм Предприятия
Курсовая работа по теме Восприятие бренда Apple
Реферат: Roe V Wade Essay Research Paper Roe
Курсовая работа: Цифровой тахометр
Реферат: 1. характеристика предприятия 5
Шпаргалки На Тему Основы Валеологии
Реферат На Тему Психология А. Маслоу
Реферат по теме История и устройство микрофонов
Реферат: Мукденский конгресс
Реферат по теме Наука и ее функции
Сочинение Морозко 5 Класс
Контрольная Работа По Биологии Членистоногие
Курсовая Работа На Тему Социально-Психологические Оценки Инноваций
Топик: История математики
Реферат: Управление персоналом как составная часть менеджмента предприятия
Реферат: Житие святителя Петра, митрополита Киевского и всея Руси