Обратный вывод

Если (< Базилева Юлия>), то (< Физико-математический факультет> и < Прикладная математика и информатика> и < 3 курс> и < ПМб-11> и < Номер 1>).

Правила «GURU»

Система «GURU» базируется на правилах. Правило состоит из посылки (IF) и заключения (THEN).

Посылка может включать:

- различные типы и виды переменных, поддерживаемых «GURU»;

- логические операторы (например, AND, OR, XOR, NOT);

- числовые операторы (+, -, /, *);

- числовые функции (SIN, COS и т.д.);

- символьные функции.

Заключение может включать команды:

- присвоение значения различным переменным;

- позволяющие проконсультироваться с другим набором правил;

- различные команды «GURU» и т.д.

Правила хранятся в обычном текстовом файле с расширением *.rss.

Пример:

/*OTPUSK.RSS*/

ACCESS: a

GOAL: HOWREST

INITIAL:

CLEAR

E.LSTR=250

HOWREST=UNKNOWN

finance=UNKNOWN

acount=UNKNOWN

zarabot=UNKNOWN

skolko=UNKNOWN

OUTPUT" Kak vi mozhete provesti otpusk..."

DO:

CLEAR

OUTPUT" Vot chto priemlemo v dannoi situacii: "

OUTPUT HOWREST

RULE: R1

IF: (finance/acount)> =5000 and (finance/acount)< =10000

THEN: howrest=" Vi mozhete neploho otdohnut na materike."

howrest= howrest+" Poezhaite k rodstvennikam."

RULE: R2

IF: (finance/acount)> 10000 and (finance/acount)< 70000

THEN: howrest=" Vi mozhete neploho otdohnut za granicei."

howrest= howrest+" Nu, razumeetsja po putevke."

RULE: R3

IF: (finance/acount)> =70000

THEN: howrest=" Vi mozhete chast sredstv vlozhit v SKV ili"

howrest= howrest+" akcii, a otpusk provesti kak pozhelaete."

RULE: R4

IF: (finance/acount) < 5000 and (finance/acount)> 3000

THEN: howrest=" Vam stoit podumat ob otdihe v lesu."

howrest= howrest+" U nas takaja krasivaja priroda. Vam ponravitsja."

RULE: R5

IF: (finance/acount)< =3000

THEN: input zarabot using " u" with " U vas est vozmozhnost podarabotat (y/n)? "

RULE: R6

IF: zarabot=" Y"

THEN: input skolko num with " Skolko? "

RULE: R7

IF: skolko > =5000

THEN: howrest=" Vi mozhete otdohnut neploho."

howrest= howrest+" Orientiruites na summu, "

howrest= howrest+" nakoplennyu v otpusknom periode."

RULE: R8

IF: skolko < 5000

THEN: howrest=" Etogo budet nedostatochno."

howrest= howrest+" Pridetsja otpusk otlozhit."

RULE: R9

IF: zarabot< > " Y"

THEN: howrest=" Ochen zhal, no Vam pridetsja podozhdat."

howrest= howrest+" Vashi finansovie vozmoznosti ne"

howrest= howrest+" pozvoljaut Vam poehat v otpusk"

howrest= howrest+" v etom godu. Viezhaite na prirodu."

VAR: HOWREST

LABEL: Varianti ishodov pri zadannih parametrah.

VAR: FINANCE

FIND: input finance num with " Kakoi summoi Vi raspolagaete? "

LABEL: Denezhnie sredstva.

VAR: ACOUNT

FIND: input acount num with " Skolko chelovek budet otdihat za Vash schet? "

LABEL: Kolichstvo izhdivencev.

END:

Здесь HOWREST - имя переменной цели; R1, …, R9 - имена правил; HOWREST, FINANCE, ACOUNT - переменные.