Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Содержание сайт... 65535
Вызов хранимых ... 65535
Эмулятор микроп... 65535
Приложение «Про... 61573
Организация зап... 61277
Invision Power ... 60931
Оператор выбора... 60248
Подключение Mic... 59040
Модуль Forms 58925
Создание отчето... 58479
ТЕХНОЛОГИИ ДОСТ... 54722
Программируемая... 53462
Пример работы с... 51423
Имитационное мо... 50147
21 ошибка прогр... 45120
Реклама
Сейчас на сайте
Гостей: 11
На сайте нет зарегистрированных пользователей

Пользователей: 13,054
новичок: Prom
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Обработка задач на ЭВМ на GPSS + Пояснительная записка
Информационная система - продуктовый магазин на Turbo Pascal (База данны...
Моделирование работы ЭВМ на GPSS + Пояснительная записка

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
ПОПОЛНЕНИЕ БАЗЫ ЗНАНИЙ
Пополним базу знаний новым классом отношений, введя значение калорийности для каждого блюда.
'калории'('артишоки в белом соусе' ,150).
'калории'('трюфели в шампанском' ,212).
'калории'('салат с яйцом' ,202).
'калории'('говяжье жаркое' ,532).
'калории'('цыпленок в липовом цвете' ,400).
'калории'('окунь во фритюре' ,270).
'калории'('фаршированный судак' ,254).
'калории'('грушевое мороженое' ,223).
'калории'('земляника со взбитыми сливками',289).
'калории'('дыня-сюрприз' ,122).



Утверждение 'калориии'('салат с яйцом',202) означает, что одна порция салата содержит 202 калории.
Тогда, чтобы узнать калорийность всех закусок, зададим вопрос:
?-'закуска'(X),'калории'(X,Y).



Для тех, кто беспокоится о своем здоровье или о стройности своей фигуры, важно определить такой объект, как 'сбалансированный обед', т.е. обед, калорийность которого не превышает, например, 800 калорий:
/* Определение отношения "калорийность обеда" */
'значение'(X,Y,Z,V):-'калории'(X,E),
'калории'(Y,P),
'калории'(Z,D),
V is E+P+D.
/*Определение отношения 'сбалансированный обед' */
'сбалансированный обед'(X,Y,Z):-'обед'(X,Y,Z),
'значение'(X,Y,Z,V),
V<800.



Здесь is - встроенный предикат, при выполнении которого вычисляется значение арифметического выражения, стоящего справа от is, и его значение присваивается переменной, стоящей слева; "+"- операция сложения; "<"- операция сравнения.
Войдите в интерпретатор, пополните БЗ и посмотрите, какие ответы будут получены в ответ на запрос:
?-'сбалансированный обед'(X,Y,Z).















Опубликовал Kest November 03 2009 18:42:50 · 0 Комментариев · 5835 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
Java 2 - Эффектив...
CABfiles
Info
Основы Delphi
JanReplace
Xrumer 4 Platinum...
Переработанный пл...
C# 2005 и платфор...
Синтаксический ан...
Трассировка прово...
Библиотека програ...
De Knop
Использование Lis...
База Allsubmitter...
Пятнашки и крести...
Работа с картотеками
Программирование ...
FatScrollbar
index.php + мод ...
Plasma

Топ загрузок
Приложение Клие... 100356
Delphi 7 Enterp... 81287
Converter AMR<-... 20037
Borland C++Buil... 10906
GPSS World Stud... 10004
Borland Delphi ... 7960
Turbo Pascal fo... 6939
Visual Studio 2... 4946
Калькулятор [Ис... 4194
FreeSMS v1.3.1 3500
Случайные статьи
Режим Ночной портр...
Двоичный поиск на ...
модель для хранени...
3.1 ЦЕЛЬ: ХРАНЕНИЕ...
Ссылки
5.2.2. Ввод литер
Учебник Паскаль
Перчатки диэлектри...
Работа с листами р...
Восстановление дан...
• Массивы Кернигана
Открытие потока
Метрика
SMB-подписиSMB-, и...
Есть несколько ста...
Передача сообщений...
Язык С: операции н...
Обзор электронной ...
Пример создания по...
Программа расчета ...
Анализ результатов...
Об анализе задачи....
Создание базы данн...
Функция GraphResul...
Проектирование алг...
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?