Лабораторная работа: Создание пробной экспертной системы

break

case "b"

output dol

output prcs

break

case "c"

output dol

output urc

break

case "d"

output dol

output prcs

output urc

break

endtest

RULE: R1

IF: ytd > td

THEN: output "Хотите ли вы узнать прогноз о процентных ставках?"

input procstv str using "a" with "(y/n)"

RULE: R2

IF: ytd > td & (procstv = "y" or procstv = "Y")

THEN: dol = "Курс доллара падает."

prcs = " Процентные ставки растут. "

output "Хотите ли вы узнать прогноз об уровне цен на бирже?"

input urcen str using "a" with "(y/n)"

RULE: R3

IF: ytd > td & (procstv = "y" or procstv = "Y") & (urcen = "y" or urcen = "Y")

THEN: urc = "Уровень цен на бирже падает."

prognoz = "d"