Что такое работа ЭС в реальном времени?
Какой тип данных не поддерживает CLIPS?
integer
 
float
 
double
 
string
 
Какая функция добавляет новые факты в список фактов?
deffacts
 
assert
 
deffunction
 
retract
 
Задано определение функции:
(deffunction ask-question (?question $?allowed-values) (printout t ?question) (bind ?answer (read)) (if (lexemep ?answer) then (bind ?answer (lowcase ?answer))) (while (not (member ?answer ?allowed-values)) do (printout t ?question) (bind ?answer (read)) (if (lexemep ?answer) then (bind ?answer (lowcase ?answer))) ?answer) Какая строка содержит ошибку?
При создании базы правил для управления вытачиванием лопаток турбины справедливо следующее метаправило:
Какие возможности характерны для объектно-ориентированного программирования?
Какое из перечисленных преимуществ не характерно для системы CLIPS?
Задано правило на CLIPS:
(deffunction sex-risk (?s ?a ?pm ?et) "sex & age related risk" (if (= 0 (str-compare ?s male)) then (if (>= ?a 45) then (return 1) else (return 0)) else (if (>= ?a 65) then (return 1) else (if (= 0 (str-compare ?pm yes)) then (if (= 0 (str-compare ?et yes)) then (return 1) else (return 0)) else then (return 0))))) В каком случае достигается повышенный риск для женщин?
При создании базы правил для управления вытачиванием лопаток турбины следует использовать правило останова:
Da = Dar
 
Ds = 300
 
Dar = 3
 
К какой группе математических функций языка CLIPS относится функция sqrt (извлечение корня)?
Задано правило ЭС диагностики автомобиля в системе CLIPS.
(defrule determine-rotation-state "" (working-state engine does-not-start) (not (rotation-state engine ?)) (not (repair ?)) => (if (yes-or-no-p "Does the engine rotate (yes/no)? ") then (assert (rotation-state engine rotates)) else (assert (rotation-state engine does-not-rotate)))) При использовании стратегии поиска по умолчанию это правило будет вызвано, когда определена следующая переменная:
rotation-state engine
 
working-state engine does-not-start
 
determine-rotation-state
 
repair
 
Задано правило на CLIPS:
(defrule Find-2-Coeval_person (person (name ?x) (age ?z) (person (name ?y) (age ?z) => (printout t “name=” ?x “ name=” ?y “ age=” ?z crlf)) Приведенное правило выведет на экран