Ïîëåçíîå:
Êàê ñäåëàòü ðàçãîâîð ïîëåçíûì è ïðèÿòíûì
Êàê ñäåëàòü îáúåìíóþ çâåçäó ñâîèìè ðóêàìè
Êàê ñäåëàòü òî, ÷òî äåëàòü íå õî÷åòñÿ?
Êàê ñäåëàòü ïîãðåìóøêó
Êàê ñäåëàòü òàê ÷òîáû æåíùèíû ñàìè çíàêîìèëèñü ñ âàìè
Êàê ñäåëàòü èäåþ êîììåð÷åñêîé
Êàê ñäåëàòü õîðîøóþ ðàñòÿæêó íîã?
Êàê ñäåëàòü íàø ðàçóì çäîðîâûì?
Êàê ñäåëàòü, ÷òîáû ëþäè îáìàíûâàëè ìåíüøå
Âîïðîñ 4. Êàê ñäåëàòü òàê, ÷òîáû âàñ óâàæàëè è öåíèëè?
Êàê ñäåëàòü ëó÷øå ñåáå è äðóãèì ëþäÿì
Êàê ñäåëàòü ñâèäàíèå èíòåðåñíûì?
Êàòåãîðèè:
ÀðõèòåêòóðàÀñòðîíîìèÿÁèîëîãèÿÃåîãðàôèÿÃåîëîãèÿÈíôîðìàòèêàÈñêóññòâîÈñòîðèÿÊóëèíàðèÿÊóëüòóðàÌàðêåòèíãÌàòåìàòèêàÌåäèöèíàÌåíåäæìåíòÎõðàíà òðóäàÏðàâîÏðîèçâîäñòâîÏñèõîëîãèÿÐåëèãèÿÑîöèîëîãèÿÑïîðòÒåõíèêàÔèçèêàÔèëîñîôèÿÕèìèÿÝêîëîãèÿÝêîíîìèêàÝëåêòðîíèêà
|
Îïèñàíèå ïåðåìåííûõ ñðåäû
Ïðèëîæåíèå 2
Îñíîâíûå êîìàíäû "GURU"
BUILD <èìÿ íàáîðà ïðàâèë> - èñïîëüçóåòñÿ äëÿ ñîçäàíèÿ, ìîäèôèêàöèè è êîìïèëÿöèè íàáîðà ïðàâèë. COMPILE <èìÿ íàáîðà ïðàâèë> - ñîçäàåò ôàéë îòêîìïèëèðîâàííîãî íàáîðà ïðàâèë. CONSULT <èìÿ ýêñïåðòíîé ñèñòåìû> - îáðàùåíèå ê ÝÑ çà êîíñóëüòàöèåé. WHY <âûðàæåíèå> - îáúÿñíÿåò, ïî÷åìó "GURU" èñïîëüçîâàëà êîíêðåòíîå ïðàâèëî. HOW <âûðàæåíèå> - îáúÿñíÿåò, êàê "GURU" íàøëà çíà÷åíèå ïåðåìåííîé. TEXT <èìÿ ôàéëà> - çàïóñêàåòñÿ òåêñòîâûé ðåäàêòîð "GURU". CLEAR - î÷èñòèòü ýêðàí. INPUT <ïåðåìåííàÿ> <USING øàáëîí><WITH âûðàæåíèå> - ââîä äàííûõ â ïåðåìåííóþ ñ èñïîëüçîâàíèåì øàáëîíà (USING) è ñ ïîäñêàçêîé (WITH). Øàáëîíû: à - äëÿ áóêâåííûõ ñèìâîëîâ (ëàòèíñêèé øðèôò); ñ - äëÿ áóêâû èëè ÷èñëà; d - äëÿ öèôðû, çíàêà (+ èëè -) èëè äåñÿòè÷íîé òî÷êè; å - ïðåîáðàçîâàíèå â ñèìâîëû íèæíåãî ðåãèñòðà; n - ñèìâîë øàáëîíà, êîòîðûé âîñïðèíèìàåò òîëüêî öèôðû â çàíèìàåìîé èì ïîçèöèé; r - äëÿ ñèìâîëîâ ASCII; u - ïðåîáðàçóåò â ñèìâîëû âåðõíåãî ðåãèñòðà. Íàïðèìåð: INPUT num USING "dddd" with "Ââåäèòå íîìåð" Íà ýêðàíå ïîÿâëÿåòñÿ òåêñò: Ââåäèòå íîìåð __ Ðàññìîòðèì åùå îäíó êîìàíäó "GURU". OUTPUT <èìÿ ïåðåìåííîé><USING øàáëîí> - âûâîäèò íà ýêðàí ïåðåìåííóþ èëè ñòðîêó. Øàáëîíû â ýòîé êîìàíäå àíàëîãè÷íû øàáëîíàì äëÿ êîìàíäû INPUT. Íàïðèìåð: OUTPUT ''Ëàáîðàòîðíàÿ ðàáîòà N1" Âûâîäèò íà ýêðàí: Ëàáîðàòîðíàÿ ðàáîòà N1 Äðóãîé ïðèìåð: OUTPUT num Âûâîäèò íà ýêðàí çíà÷åíèå ïåðåìåííîé num. Ïðèâåäåì òàêæå ïåðå÷åíü ñëåäóþùèõ êîìàíä "GURU": HELP - âûâîäèò ñïðàâî÷íóþ èíôîðìàöèþ; RUN — âûïîëíÿåò âíåøíþþ ïðîãðàììó; DIR - ïðîñìàòðèâàåò äèðåêòîðèþ; BYE - âûõîäèò èç ðåæèìà; RELEASE - îñâîáîæäàåò ïàìÿòü, óäàëÿÿ äàííûå è ïðîãðàììû "GURU"; PEPFORM - âûïîëíÿåò ïðîöåäóðó; WAIT - ïðèîñòàíàâëèâàåò îáðàáîòêó äî íàæàòèÿ ëþáîé êëàâèøè.
Ïðèëîæåíèå 3
Âûðàæåíèÿ è ôóíêöèè "GURU"
Àðèôìåòè÷åñêèå:
+ - ñëîæåíèå; - - âû÷èòàíèå; * - óìíîæåíèå; / - äåëåíèå; ** - âîçâåäåíèå â ñòåïåíü; MOD - äåëåíèå ïî ìîäóëþ.
Ñðàâíåíèå:
EQ = - ðàâíî; NÅ, <> - íå ðàâíî; GT, > - áîëüøå ÷åì; LT, < - ìåíüøå ÷åì; GE, < = - ìåíüøå èëè ðàâíî; LE, > = - áîëüøå èëè ðàâíî.
Ëîãè÷åñêèå:
NÎÒ - íåò; AND, & - è; OR - èëè; XÎR - èñêëþ÷àþùåå "èëè"; = - ïðèñâîåíèå; () - èíäåêñû ìàññèâà.
Ñòðîêîâûå:
+ - ñöåïëåíèå ñòðîê; ' - êàâû÷êà; $ - ñèìâîë ñîîòâåòñòâèÿ ñèìâîëà; * - ñèìâîë ñîîòâåòñòâèÿ ñòðîêè.
×èñëîâûå ôóíêöèé:
ABS - àáñîëþòíîå çíà÷åíèå; ARCSIN - àðêñèíóñ; ÅÕÐ – å â ñòåïåíè; INIT - èíèöèàëèçèðóåò ìàññèâ; LEN - îïðåäåëÿåò äëèíó ñòðîêè; LN - âû÷èñëÿåò íàòóðàëüíûé ëîãàðèôì; LOG - âû÷èñëÿåò ëîãàðèôì ñ îñíîâàíèåì 10; ÌÀÕ - íàèáîëüøåå èç äâóõ ÷èñåë; MENU - ñîçäàåò ìåíþ; MIN - ìåíüøåå èç äâóõ ÷èñåë; RAND - ñëó÷àéíîå ÷èñëî; SIN - ñèíóñ; SQRT - êâàäðàòíûé êîðåíü.
Ñèìâîëüíûå ôóíêöèè:
CHR - ïðåîáðàçóåò êîä ASCII â åãî ñèìâîëüíûé ýêâèâàëåíò; VAL - ïðåîáðàçóåò ñèìâîë â åãî êîä ASCII; INIT - èíèöèàëèçèðóåò ìàññèâ; SUBSTR - âûäåëÿåò ïîäñòðîêó èç ñòðîêè; TIME - âîçâðàùàåò òåêóùåå âðåìÿ; TOSTR - ïðåîáðàçóåò ÷èñëà â ñèìâîëû; TONUM - ïðåîáðàçóåò ñòðîêó â ÷èñëî; TRIM - îòñåêàåò êîíå÷íûå ïðîáåëû; ÒÓÐÅ - òèï ïåðåìåííîé.
Ëîãè÷åñêèå ôóíêöèè:
ALPHASTR - âñÿ ëè ñòðîêà ñîñòîèò èç áóêâ; INIT - èíèöèàëèçèðóåò ìàññèâ.
Ïðèëîæåíèå 4 Âàðèàíòû çàäàíèé ê ëàáîðàòîðíîé ðàáîòå 1
Âàðèàíò 1 GOAL: ways
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-TRUE, HET-FALSE) */
INITIAL: Clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output "ÄÎÁÐÛÉ ÄÅÍÜ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output "ÂÛ, ÏÓÒÅØÅÑÒÂÓß ÍÀ ÑÂÎÅÌ ÀÂÒÎÌÎÁÈËÅ, ÎÑÒÀÍÎÂÈËÈÑÜ ÏÅÐÅ-" output "ÄÎÕÍÓÒÜ. À ÊÎÃÄÀ ÍÀÁÐÀËÈÑÜ ÑÈË, ÒÎ ÎÁÍÀÐÓÆÈËÈ, ×ÒÎ output "ÂÀØÀ ÌÀØÈÍÀ ÍÅ ÇÀÂÎÄÈÒÑß. MÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀ ÑÎÂÅÒ" output "ÏÎ ÓÑÒÐÀÍÅÍÈÞ È ÏÐÈ×ÈÍÀÌ ÏÎßÂËÅÍÈß ÍÅÈÑÏÐÀÂÍÎÑÒÅÉ." output "ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÂÍÅ ÂÑÞ ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÏÎÅÕÀËÈ" output fires = true input fires logic with "ÅÑÒÜ ËÈ ÈÑÊÐÀ  ÁËÎÊÅ ÇÀÆÈÃÀÍÈß?"
DO: clear output "ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ, ËÞÁÅÇÍÅÉØÈÉ." output output reasons output output "À ÂÎÒ ×ÒÎ ÂÀÌ ÑËÅÄÓÅÒ ÑÄÅËÀÒÜ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output output ways
RULE: Rl IF: fires THEN: output input petrol logic with " ÏÎÑÒÓÏÀÅÒ ËÈ ÁÅÍÇÈÍ Â ÊÀÐÁÞÐÀÒÎÐ?" REASON: ÅÑËÈ ÅÑÒÜ ÈÑÊÐÀ, ÒÎ ÍÓÆÅÍ ÅÙÅ È ÁÅÍÇÈÍ. COMMENT: ÏÎÑÒÓÏÀÅÒ ËÈ ÁÅÍÇÈÍ Â ÊÀÐÁÞÐÀÒÎÐ.
RULE: R2 IF: not fires THEN: output input acommulate logic with " ÎÊÈÑËÅÍÛ ÊËÅÌÌÛ ÀÊÊÓÌÓËßÒÎÐÀ?" REASON: ÅÑËÈ ÍÅÒ ÈÑÊÐÛ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÎÊÈÑËÈËÈÑÜ ÊËÅÌÌÛ ÀÊ-ÐÀ. COMMENT: ÎÊÈÑËÈËÑß ËÈ ÀÊÊÓÌÓËßÒÎÐ.
RULE: R3 IF: not petrol THEN: output "ÅÑÒÜ ËÈ ÁÅÍÇÈÍ Â ÁÀÊÅ ÂÀØÅÃÎ ÀÂÒÎÌÎÁÈËß?" input ptrltank logic REASON: ÅÑËÈ ÁÅÍÇÈÍ Â ÊÀÐÁÞÐÀÒÎÐ ÍÅ ÏÎÑÒÓÏÀÅÒ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ, ÎÍ ÏÐÎÑÒÎ ÊÎÍ×ÈËÑß. COMMENT: ÍÅÒ ÁÅÍÇÈÍÀ  ÁÀÊÅ ÀÂÒÎÌÎÁÈËß.
RULE: R4 IF: not ptrltank THEN: rasons="KOH×ÈËÑß ÁÅÍÇÈÍ Â ÁÀÊÅ ÂÀØÅÃÎ ÀÂÒÎÌÎÁÈËß." ways=" ÇÀÏÐÀÂÜÒÅ ÌÀØÈÍÓ ÃÎÐÞ×ÈÌ." REASON: ÅÑËÈ ÍÅÒ ÁÅÍÇÈÍÀ, ÒÎ ÍÀÄÎ ÇÀÏÐÀÂÈÒÜÑß. COMMENT: ÏÓÑÒÎÉ ÁÀÊ.
RULE: R5 IF: ptrltank THEN: ãåàsons="ÇÀÑÎÐÈËÀÑÜ ÒÐÓÁÊÀ ÁÅÍÇÎÍÀÑÎÑÀ." wavs="ÎÒÑÎÅÄÈÍÈÒÅ ÒÐÓÁÊÓ È ÏÐÎÄÓÉÒÅ. ÇÀÒÅÌ, ÓÑÒÀÍÎÂÈÂ" ways=ways+" ÍÀ ÌÅÑÒÎ, ÏÎÏÐÎÁÓÉÒÅ ÑÍÎÂÀ ÇÀÂÅÑÒÈ." REASON: ÅÑËÈ ÁÅÍÇÈÍ Â ÁÀÊÅ ÅÑÒÜ, À  ÊÀÐÁÞÐÀÒÎÐÅ ÅÃÎ ÍÅÒ, ÒÎ ÍÀÄÎ ÏÐÎ×ÈÑÒÈÒÜ ÒÐÓÁÊÈ, ÏÎÑÒÀÂËßÞÙÈÅ ÒÎÏËÈÂÎ Â ÊÀÐÁÞÐÀÒÎÐ COMMENT: ÇÀÑÎÐÈËÈÑÜ ÊÀÍÀËÛ ÏÎÄÀ×È ÁÅÍÇÈÍÀ.
RULE: R6 IF: acommulate THEN: reasons="ÏËÎÕÎÉ ÊÎÍÒÀÊÒ ÖÅÏÈ ÇÀÆÈÃÀÍÈß Ñ ÀÊÊÓ-ÐÎÌ" ways="ÇÀ×ÈÑÒÈÒÅ ÊËÅÌÌÛ ÍÀÆÄÀ×ÍÎÉ ØÊÓÐÊÎÉ È ÏÎÏÛÒÀÉÒÅÑÜ" ways=ways+" ÇÀÂÅÑÒÈ ÂÍÎÂÜ." REASON: ÅÑËÈ ÎÊÈÑËÅÍÛ ÊÎÍÒÀÊÒÛ, ÒÎ ÈÕ ÍÀÄÎ ÇÀ×ÈÑÒÈÒÜ. COMMENT: ÏËÎÕÎÉ ÊÎÍÒÀÊÒ ÀÊÊÓÌÓËßÒÎÐÀ Ñ ÏÐÎÂÎÄÊÎÉ.
RULE: R7 IF: not acommulate THEN: output "ÀÊÊÓÌÓËßÒÎÐ ÂÛÐÀÁÎÒÀË ÑÂÎÉ ÐÅÑÓÐÑ?" input lowenergy logic REASON: ÅÑËÈ ÍÅÒ ÈÑÊÐÛ È ÊÎÍÒÀÊÒ Â ÏÎÐßÄÊÅ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÂÀØ ÀÊÊÓÌÓËßÒÎÐ ÏÐÈØÅË Â ÍÅÃÎÄÍÎÑÒÜ. COMMENT: ÐÅÑÓÐÑ ÀÊÊÓÌÓËßÒÎÐÀ.
RULE: R8 IF: lowenergy THEN: reasons="ÂÀØ ÀÊÊÓÌÓËßÒÎÐ ÑÒÀË ÍÅÏÐÈÃÎÄÍÛÌ." ways=" ÅÑËÈ ÅÑÒÜ ÂÎÇÌÎÆÍÎÑÒÜ, ÒÎ ÇÀÌÅÍÈÒÅ ÑÂÎÉ ÀÊÊÓÌÓ-" ways=ways+"ËßÒOP. B ÏÐÎÒÈÂÍÎÌ ÑËÓ×ÀÅ ÂÀÌ ÏÐÈÄÅÒÑß" ways=ways+" ÇÀÂÎÄÈÒÜ ÑÂÎÈ ÀÏÏÀÐÀÒ 'ÐÓ×ÊÎÉ' (ÈÇÎÃÍÓÒÛÉ " wàós=wàós+" ÊÓÑÎÊ ÆÅËÅÇÊÈ)" REASON: ÅÑËÈ ÑÅË ÀÊÊÓÌÓËßÒÎÐ, ÒÎ ÅÃÎ ÍÀÄÎ ÌÅÍßÒÜ ËÈÁÎ ÇÀÂÎÄÈÒÜ ÌÀØÈÍÓ 'ÐÓ×ÊÎÉ' COMMENT: ÑÅË ÀÊÊÓÌÓËßÒÎÐ.
VAR: fires LABEL: ÍÀËÈ×ÈÅ ÈÑÊÐÛ Â ÁËÎÊÅ ÇÀÆÈÃÀÍÈß
VAR: WAYS FIND: reasons="ÏÐÈ×ÈÍÀ ÏÎßÂËÅÍÈß ÝÒÈÕ ÍÅÏÎËÀÄÎÊ ÍÅÈÇÂÅÑÒÍÀ." ways="ÏÎÏÐÎÁÓÉÒÅ ÎÁÐÀÒÈÒÜÑß Â ÀÂÒÎÑÅÐÂÈÑ." LABEL: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ
END:
 âàðèàíòå 1 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) àâòîìîáèëü çàâîäèòñÿ, íî íå åäåò; á) àâòîìîáèëü çàâîäèòñÿ, åäåò, íî íå òóäà, êóäà åãî íàïðàâëÿåò âîäèòåëü.
Âàðèàíò 2 GOAL: computer
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒÎÂ, */ /* ÊÀÊ ÄÅÉÑÒÂÎÂÀÒÜ, ÅÑËÈ ÂÄÐÓà ÂÀØ ÊÎÌÏÜÞÒÅÐ ÏÐÈ ÂÊËÞ×ÅÍÈÈ */ /* ÅÃÎ Â ÑÅÒÜ ÂÅÄÅÒ ÑÅÁß ÍÅ ÒÀÊ, ÊÀÊ ÎÁÛ×ÍÎ. È ÂÎÒ,  ÇÀÂÈÑÈ- */ /* ÌÎÑÒÈ ÎÒ ÂÍÅØÍÅÃÎ ÏÐÎßÂËÅÍÈß ÝÒÈÕ ÑÒÐÀÍÍÎÑÒÅÉ ÂÀÌ ÁÓÄÅÒ */ /* ÄÀÍ ÑÎÂÅÒ, ÊÀÊÎÅ ÄÅÉÑÒÂÈÅ ÏÐÅÄÏÐÈÍßÒÜ. ÊÎÍÅ×ÍÎ, ÝÒÎ ÌÀËÅÍÜ- */ /* ÊÈÈ È ÄÀËÅÊÎ ÍÅÏÎËÍÛÉ ÍÀÁÎÐ, È, ÂÎÇÌÎÆÍÎ, ÑÎÂÅÒÛ ÂÀÌ ÏÎÊÀ- */ /* ÆÓÒÑß ÍÅÓÌÅÑÒÍÛÌÈ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ */ /* ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output " ÏÐÈ ÂÊËÞ×ÅÍÈÈ ÊÎÌÏÜÞÒÅÐÀ ÂÛ ÍÅ ÏÎËÓ×ÀÅÒÅ ÎÁÛ×ÍÎÃÎ" output " ÐÅÇÓËÜÒÀÒÀ. ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ Â ÝÒÎÌ ÍÅ-" output "ÏÐÎÑÒÎÌ ÄÅËÅ. ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ" output " ÌÍÅ ÂÑÞ ÈÍÔÎÐÌÀÖÈÞ. ÈÒÀÊ, ÍÀ×ÍÅÌ" power=true output "ÇÀÃÎÐÀÅÒÑß ËÈ ÈÍÄÈÊÀÒÎÐ ÏÈÒÀÍÈß ÍÀ ÂÀØÅÌ ÊÎÌÏÜÞÒÅÐÅ?" input power logic
DO: clear output " ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ, ËÞÁÅÇÍÅÉØÈÉ." output output computer
RULE: R1 IF: power THEN: output output "ÍÓ ÕÎÒÜ ÏÈÒÀÍÈÅ Â ÏÎÐßÄÊÅ, È ÒÎ ÕÎÐÎØÎ!" output "ÈÑÏÐÀÂÅÍ È ÏÐÀÂÈËÜÍÎ ËÈ ÏÎÄÊËÞ×ÅÍ ÄÈÑÏËÅÉ?" input displ logic REASON: ÅÑËÈ Â ÏÎÐßÄÊÅ ÏÈÒÀÍÈÅ, ÒÎ Â ÏÎÐßÄÊÅ ËÈ ÄÈÑÏËÅÉ. COMMENT: ÄËß, ÒÎÃÎ ×ÒÎÁÛ ×ÒÎ-ÒÎ ÓÂÈÄÅÒÜ, ÍÅÎÁÕÎÄÈÌÎ ÓÑÒÐÎÉÑÒÂÎ ÎÒÎÁÐÀÆÅÍÈß ÈÍÔÎÐÌÀÖÈÈ.
RULE: R2 IF: not power THEN: output computer="ÏÐÎÂÅÐÜÒÅ ÍÀÏÐßÆÅÍÈÅ Â ÑÅÒÈ. ÂÊËÞ×ÈÒÅ ÏÈÒÀ-" computer=computer+"HÈE ÈËÈ ÏÎ×ÈÍÈÒÅ ÁËÎÊ ÏÈÒÀÍÈß È" computer=computer+"ÏÎÏÐÎÁÓÉTE ÅÙÅ ÐÀÇ." REASON: ÅÑËÈ ÍÅÒ ÏÈÒÀÍÈß, ÒÎ ÍÅÎÁÕÎÄÈÌÎ ÅÃÎ ÎÁÅÑÏÅ×ÈÒÜ COMMENT: ÁÅÇ ÍÎÐÌÀËÜÍÎÃÎ ÏÈÒÀÍÈß ÍÈÊÒÎ ÂÀÌ ÐÀÁÎÒÀÒÜ ÍÅ ÁÓÄÅÒ.
RULE: R3 IF: not displ THEN: output computer= EPbTE ÍÀÏÐßÆÅÍÈÅ ÑÅÒÈ. ÂÊËÞ×ÈÒÅ ÄÈÑÏËÅÈ" computer=computer+"ÈËÈ ÓÑÒÐÎÈÒÅ ÒÀÊ, ×ÒÎÁÛ ÎÍ ÐÀÁÎÒÀË" computer=computer+"È ÏÎÏÐÎÁÓÉÒÅ ÅÙÅ ÐÀÇ." "ÏPOB REASON: HE ÐÀÁÎÒÀÅÒ ÄÈÑÏËÅÈ. ÍÅÎÁÕÎÄÈÌÎ, ×ÒÎÁÛ ÎÍ ÐÀÁÎÒÀË. COMMENT: ÁÅÇ ÐÀÁÎÒÀÞÙÅÃÎ ÄÈÑÏËÅß - ÍÅ ÆÈÇÍÜ.
RULE: R4 IF: displ THEN: output "ÅÑÒÜ ËÈ Ó ÂÀØÅÃÎ ÊÎÌÏÜÞÒÅÐÀ ÆÅÑÒÊÈÉ ÄÈÑÊ?" input harddisk logic REASON: ÅÑËÈ ÏÈÒÀÍÈÅ ÊÎÌÏÜÞÒÅÐÀ È ÄÈÑÏËÅÈ Â ÏÎÐßÄÊÅ, ÒÎ ÍÀÄÎ ÇÍÀÒÜ, ÏÎÄÊËÞ×ÅÍ ËÈ Ê ÂÀØÅÉ ÌÀØÈÍÅ ÆÅÑÒÊÈÉ ÄÈÑÊ. COMMENT: ÏÎÄÊËÞ×ÅÍ ËÈ ÆÅÑÒÊÈÉ ÄÈÑÊ.
RULE: R5 IF: harddisk THEN: output "ÏÐÎÈÑÕÎÄÈÒ ÎÁÐÀÙÅÍÈÅ Ê ÄÈÑÊÓ (ÈÍÄÈÊÀÒÎÐ " output "ÃÎÐÈÒ)?" input HDtest logic REASON: ÅÑËÈ ÓÑÒÀÍÎÂËÅÍ "ÂÈÍ×ÅÑÒÅÐ", ÒÎ ÏÐÎÂÅÐÈÌ ÏÎÄÊËÞ×ÅÍÈÅ. COMMENT: ÅÑËÈ "ÂÈÍÒ" ÍÀ ÌÅÑÒÅ, ÒÎ ÇÀÌÅ×ÀÅÒ ËÈ ÅÃÎ ÑÈÑÒÅÌÀ.
RULE: R6 IF: not harddisk THEN: output "ÓÑÒÀÍÎÂËÅÍÛ ÍÀ ÂÀØÅÉ ÌÀØÈÍÅ ÄÈÑÊÎÂÎÄÛ ÃÈÁ-" output "ÊÈÕ ÄÈÑÊÎÂ (1 È ÁÎËÅÅ)? " input diskete logic REASON: ÅÑËÈ ÍÅÒ "ÂÈÍÒÀ", ÒÎ ÄÈÑÊÎÂÎÄÛ ÍÀ ÌÀØÈÍÅ ÓÑÒÀÍÎÂËÅÍÛ? COMMENT: ÅÑÒÜ ËÈ ÄÈÑÊÎÂÎÄÛ.
RULE: R7 IF: not HDtest output "ÓÑÒÀÍÎÂËÅÍÛ ËÈ ÍÀ ÂÀØÅÉ ÌÀØÈÍÅ ÄÈÑÊÎÂÎÄÛ" output " ÃÈÁÊÈÕ ÄÈÑÊÎÂ (1 È ÁÎËÅÅ)? THEN: input diskete logic REASON: ÓÑÒÀÍÎÂËÅÍÛ ËÈ ÄÈÑÊÎÂÎÄÛ ÍÀ ÌÀØÈÍÅ? COMMENT: ÅÑÒÜ ËÈ ÄÈÑÊÎÂÎÄÛ.
RULE: R8 IF: HDtest THEN: output "ÂÛÄÀÅÒÑß ËÈ ÑÎÎÁÙÅÍÈÅ ÎÁ ÎØÈÁÊÅ ×ÒÅÍÈß 'ÂÈ-" output "Í×ÅÑÒÅÐÀ'?" input HDerror logic REASON: ÁÅÇ ÎØÈÁÎÊ ËÈ ÏÐÎÕÎÄÈÒ ÎÏÅÐÀÖÈß ÒÅÑÒÈÐÎÂÀÍÈß. COMMENT: ÍÀËÈ×ÈÅ ÎØÈÁÎÊ ÒÅÑÒÈÐÎÂÀÍÈß ÄÈÑÊÀ.
RULE: R9 IF: HDerror THEN: output "ÓÑÒÀÍÎÂËÅÍÛ ËÈ ÍÀ ÂÀØÅÉ ÌÀØÈÍÅ ÄÈÑÊÎÂÎÄÛ ÃÈ-" output "ÁÊÈÕ ÄÈÑÊÎÂ (1 È ÁÎËÅÅ)? " input diskete logic REASON: ÅÑËÈ ÅÑÒÜ ÎØÈÁÊÈ Â ÐÀÁÎÒÅ "ÂÈÍÒÀ", ÒÎ ÈÍÒÅÐÅÑÍÎ, ÓÑÒÀÍÎÂËÅÍÛ ËÈ ÄÈÑÊÎÂÎÄÛ ÍÀ ÌÀØÈÍÅ? COMMENT: ÅÑÒÜ ËÈ ÄÈÑÊÎÂÎÄÛ.
RULE: R10 IF: diskete THEN: computer="BAM ÑËÅÄÓÅÒ ÂÑÒÀÂÈÒÜ Â ÄÈÑÊÎÂÎÄ ÑÈÑÒÅÌÍÓÞ " computer=computer+"ÄÈÑÊÅÒÓ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÃÎ ÔÎÐÌÀÒÀ " computer=computer+" È ÏÅÐÅÇÀÃÐÓÇÈÒÜ ÊÎÌÏÜÞÒÅÐ." REASON: ÅÑËÈ "ÂÈÍÒ" ÍÅ Â ÏÎÐßÄÊÅ, ÒÎ ÑËÅÄÓÅÒ ÈÑÏÎËÜÇÎÂÀÒÜ ÃÈÁÊÈÉ ÄÈÑÊ ÄËß ÇÀÃÐÓÇÊÈ ÑÈÑÒÅÌÛ. COMMENT: ÑËÅÄÓÅÒ ÈÑÏÎËÜÇÎÂÀÒÜ ÃÈÁÊÈÉ ÄÈÑÊ ÄËß ÇÀÃÐÓÇÊÈ ÑÈÑÒÅÌÛ.
RULE: R11 IF: not diskete THEN: computer="BAM ËÓ×ØÅ ÂÑÅÃÎ ÄÀËÜØÅ ÍÅ ÓÃËÓÁËßÒÜÑß Â " computer=computer+"ÝÒÓ ÏÐÎÁËÅÌÓ, À ÂÛÇÂÀÒÜ ÌÀÑÒÅÐÀ." REASON: ÅÑËÈ ÍÅ ÐÀÁÎÒÀÞÒ (ÎÒÑÓÒÑÒÂÓÞÒ) ÄÈÑÊ È ÄÈÑÊÎÂÎÄÛ, ÒÎ ÍÅ ÑÒÎÈÒ ÏÛÒÀÒÜÑß ÏÅÐÅÇÀÃÐÓÇÈÒÜ ÌÀØÈÍÓ. COMMENT: HE ÐÀÁÎÒÀÞÒ ÄÈÑÊ È ÄÈÑÊÎÂÎÄÛ, ÑËÅÄÎÂÀÒÅËÜÍÎ, ÍÅ ÑÒÎÈÒ ÏÛÒÀÒÜÑß ÏÅÐÅÇÀÃÐÓÇÈÒÜ ÌÀØÈÍÓ.
RULE: R12 IF: not HDerror THEN: computer="ECËÈ HE ÏÎßÂËßÅÒÑß ÏÐÈÃËÀØÅÍÈÅ ÎÏÅÐÀÖÈÎÍÍÎÉ" computer=computer+" ÑÈÑÒÅÌÛ, ÒÎ ÏÐÎÂÅÐÜÒÅ ÑÎÄÅÐÙÈÌÎÅ" computer=computer+"ÔÀÉËΠautoexec.bat È config.sys," computer=computer+'3AÃÐÓÇÈÂØÈÑÜ Ñ ÄÈÑÊÅÒÛ. È ÅÑËÈ ÒÀÌ" computer=computer+" ÂÑÅ Â ÏÎÐßÄÊÅ, ÏÅÐÅÇÀÏÈØÈÒÅ ÎÑ." REASON: ÅÑËÈ ÍÅÒ ÎØÈÁÊÈ ×ÒÅÍÈß "ÂÈÍ×ÅÑÒÅÐÀ" ÒÎ ÂÑÅ ÅÙÅ ÌÎÆÍÎ ÈÑÏÐÀÂÈÒÜ, ËÈØÜ ÁÛ ÄÈÑÊÎÂÎÄ ÃÈÁÊÈÕ ÄÈÑÊΠÁÛË ÈÑÏÐÀÂÅÍ. COMMENT: ÍÅÒ ÎØÈÁÊÈ ×ÒÅÍÈß "ÂÈÍÒÀ".
VAR: POWER LABEL: ÑÐÀÁÀÒÛÂÀÍÈÅ ÑÂÅÒÎÂÎÉ ÈÍÄÈÊÀÖÈÈ ÏÐÈ ÂÊËÞ×ÅÍÈÈ ÊÎÌÏÜÞÒÅÐÀ END:
 âàðèàíòå 2 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) íåèñïðàâíîñòü êëàâèàòóðû êîìïüþòåðà; á) íåèñïðàâíîñòü ìàíèïóëÿòîðà òèïà "ìûøü".
Âàðèàíò 3 GOAL: ways
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /* ÓÑÒÐÀÍÅÍÈÞ ÍÅÊÎÒÎÐÛÕ ÄÅÔÅÊÒΠÂÎÄÍÛÕ ÊÐÀÑÎÊ È ÑÎÎÁÙÈÒ */ /* ÏÐÈ×ÈÍÛ ÈÕ ÏÎßÂËÅÍÈß. ÊÎÍÅ×ÍÎ, ÝÒÎ ÌÀËÅÍÜÊÈÉ È ÍÅ ÏÎËÍÛÉ */ /* ÍÀÁÎÐ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ ÑÀÌÛÕ */ /* ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. ÒÀÊ ×ÒÎ ÍÅ ÎÆÈÄÀÉÒÅ */ /* ×ÅÃÎ-ËÈÁÎ ÑÂÅÐÕÈÍÒÅËËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ*/ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ. (ÄÀ-TRUE, HET-FALSE) */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output " ÏÎÑËÅ ÎÊÐÀÑÊÈ ÏÎÂÅÐÕÍÎÑÒÈ ÂÎÄÍÛÌÈ ÊÐÀÑÊÀÌÈ ÌÎÃÓÒ" output " ÏÐÎßÂÈÒÜÑß ÄÅÔÅÊÒÛ." output " ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ ÏÎ ÈÕ ÓÑÒÐÀÍÅÍÈÞ È" output " ÏÐÈ×ÈÍÀÌ ÏÎßÂËÅÍÈß." output " ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ ÂÑÞ " output "ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÍÀ×ÍÅÌ..." defects=true output " ÏÎßÂÈËÈÑÜ ËÈ ÄÅÔÅÊÒÛ ÍÀ ÎÊÐÀØÅÍÍÎÉ ÏÎÂÅÐÕÍÎÑÒÈ?" input defects logic
DO: clear output " ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ, ËÞÁÅÇÍÅÉØÈÉ." output output reasons output output "À ÂÎÒ ×ÒÎ ÂÀÌ ÑËÅÄÓÅÒ ÑÄÅËÀÒÜ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÉ." output output ways
RULE: Rl IF: defects THEN: output input circle logic with " ÝÒÈ ÄÅÔÅÊÒÛ - ÏßÒÍÀ?" REASON: ÅÑËÈ ÅÑÒÜ ÄÅÔÅÊÒÛ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÏßÒÍÀ. COMMENT: ßÂËßÞÒÑß ËÈ ÄÅÔÅÊÒÛ ÏßÒÍÀÌÈ.
RULE: R2 IF: not defects THEN: output reasons="HET ÄÅÔÅÊÒΠÍÀ ÏÎÂÅÐÕÍÎÑÒÈ, ÇÍÀ×ÈÒ ÂÛ " reasons=reasons+"BCE ÑÄÅËÀËÈ ÏÐÀÂÈËÜÍÎ." ways="ÏÎÉÄÈÒÅ ËÓ×ØÅ ÎÒÄÎÕÍÈÒÅ. ÂÅÄÜ Ó ÂÀÑ" ways=ways+" ÂÑÅ Â ÏÎÐßÄÊÅ." REASON: ÅÑËÈ ÍÅÒ ÄÅÔÅÊÒÎÂ, ÒÎ ÍÈ×ÅÃÎ ÄÅËÀÒÜ ÍÅ ÍÓÆÍÎ. COMMENT: ÍÅÒ ÄÅÔÅÊÒΠ- ÎÒÄÛÕÀÉ.
RULE: R3 IF: not circle THEN: output input lines logic with " ÝÒÈ ÄÅÔÅÊÒÛ - ÏÎËÎÑÛ? " REASON: ÅÑËÈ ÄÅÔÅÊÒÛ ÍÅ ÏßÒÍÀ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÏÎËÎÑÛ. COMMENT: ßÂËßÞÒÑß ËÈ ÄÅÔÅÊÒÛ ÏÎËÎÑÀÌÈ.
RULE: R4 IF: circle THEN: output input fatcrcl logic with "ÝÒÎ ÆÈÐÍÛÅ ÏßÒÍÀ?" REASON: ÅÑËÈ ÄÅÔÅÊÒÛ ÏßÒÍÀ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÆÈÐÍÛÅ ÏßÒÍÀ. COMMENT: ßÂËßÞÒÑß ËÈ ÏßÒÍÀ ÆÈÐÍÛÌÈ.
RULE: R5 IF: fatcrcl THEN: output output "ÎÊÐÀØÅÍÍÀß ÏÎÂÅÐÕÍÎÑÒÜ ßÂËßÅÒÑß " output " ØÒÓÊÀÒÓÐÊÎÉ?" input sfcshtkr logic output REASON: ÅÑËÈ ÏßÒÍÀ ÆÈÐÍÛÅ, ÒÎ ÂÀÆÍÎ ÇÍÀÒÜ, ÊÀÊÀß ÏÎÂÅÐÕÍÎÑÒÜ ÎÊÐÀØÅÍÀ. COMMENT: ÍÀ ØÒÓÊÀÒÓÐÊÅ ÆÈÐÍÛÅ ÏßÒÍÀ.
RULE: R6 IF: not sfcshtkr THEN: output output "ÎÊÐÀØÅÍÍÀß ÏÎÂÅÐÕÍÎÑÒÜ ßÂËßÅÒÑß" output " ÆÅËÅÇÎÁÅÒÎÍÍÎÉ?" input sfcsteel logic REASON: ÅÑËÈ ÏßÒÊÀ ÆÈÐÍÛÅ, ÒÎ ÂÀÆÍÎ ÇÍÀÒÜ, ÊÀÊÀß ÏÎÂÅÐÕÍÎÑÒÜ ÎÊÐÀØÅÍÀ. COMMENT: ÍÀ ÆÅËÅÇÎÁÅÒÎÍÅ ÆÈÐÍÛÅ ÏßÒÍÀ.
RULE: R7 IF: not sfcsteel THEM: output reasons="ÏPÈ×ÈHA ÏÎßÂËÅÍÈß ÝÒÈÕ ÆÈÐÍÛÕ ÏßÒÅÍ" reasons=reasons+" ÌÍÅ ÍÅÈÇÂÅÑÒÍÀ." ways="ÏÎÏÐÎÁÓÊÒÅ ÎÁÐÀÒÈÒÜÑß Ê ÁÎËÅÅ ÎÏÛÒÍÎÌÓ" ways=ways+" ÑÏÅÖÈÀËÈÑÒÓ." REASON: ÅÑËÈ ÆÈÐÍÛÅ ÏßÒÍÀ ÏÎßÂÈËÈÑÜ ÍÀ ÊÀÊÎÉ-ÒÎ ÄÐÓÃÎÉ ÏÎÂÅÐÕÍÎÑÒÈ, ÒÎ ÍÈ×ÅÃÎ ÏÓÒÍÎÃÎ ÏÎÑÎÂÅÒÎÂÀÒÜ ÂÀÌ ß ÍÅ ÌÎÃÓ. COMMENT: ÆÈÐÍÛÅ ÏßÒÍÀ ÍÀ ÍÅÇÀÐÅÇÅÐÂÈÐÎÂÀÍÍÎÉ ÏÎÂÅÐÕÍÎÑÒÈ.
RULE: E8 IF: sfcsteel THEN: reasons="HA ÆÅËÅÇÎÁÅÒÎÍÅ ÑËÅÄÛ ÍÅÂÛÑÛÕÀÞÙÈÕ " reasons=reasons+"MACEË ÎÒ ÑÌÀÇÊÈ ÔÎÐÌ." wàós="Î×ÈÑÒÈÒÜ ÏÎÂÅÐÕÍ. ÎÒ ÑËÎß ÊÐÀÑÊÈ ÂÌÅÑÒÅ ÑÎ" ways=ways+" ØÏÀÊËÅÂÊÎÉ, ÏÐÎÌÛÒÜ 5%-ÍÛÌ ÐÀÑÒÂ. " ways=ways+"ÒÐÈÍÀÒÐÈÉÔÎÑÔÀÒÀ ÈËÈ ÊÀËÜÖ-ÎÉ " ways=ways+"ÑÎÄÛ, ÍÅÉÒÐÀËÈÇÎÂÀÒÜ ÏÎÂÅÐÕÍÎÑÒÜ 5%-ÍÛÌ" ways=ways+" PACTB. ÑÎËßÍÎÉ ÊÈÑËÎÒÛ È ÂÍÎÂÜ ÎÊÐÀÑÈÒÜ." REASON: ÅÑËÈ ÆÈÐÍÛÅ ÏßÒÍÀ ÍÀ ÆÅËÅÇÎÁÅÒÎÍÅ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÆÈÐÍÛÕ ÏßÒÅÍ ÍÀ ÆÅËÅÇÎÁÅÒÎÍÅ.
RULE: R9 IF: sfcshtkr THEN: reasons="HA ØÒÓÊÀÒÓÐÊÅ ÎÑÒÀËÈÑÜ ÏßÒÍÀ ÍÅÂÛÑÛÕÀÞÙÈÕ" reasons=reasons+" ÌÈÍÅÐÀËÜÍÛÕ È ÆÈÂÎÒÍÛÕ ÌÀÑÅË." ways="ÂÛÐÓÁÈÒÜ ØÒÓÊÀÒÓÐÊÓ ÍÀ Ó×ÀÑÒÊÅ ÏßÒÍÀ, ÂÍÎÂÜ " ways=ways+"ÎÒØÒÓÊÀÒÓÐÈÒÜ È ÎÊÐÀÑÈÒÜ, ÏÐÎÌÛÒÜ ÏÎÂÅÐ-" ways=ways+"XHOCTb ÙÅËÎ×ÍÎÉ ÂÎÄÎÉ È ÂÍÎÂÜ ÎÊÐÀÑÈÒÜ." REASON: ÅÑËÈ ÆÈÐÍÛÅ ÏßÒÍÀ ÍÀ ØÒÓÊÀÒÓÐÊÅ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÆÈÐÍÛÕ ÏßÒÅÍ ÍÀ ØÒÓÊÀÒÓÐÊÅ.
RULE: R10 IF: not fatcrcl THEN: output output "ÝÒÎ ÆÅËÒÛÅ ÐÆÀÂÛÅ ÏßÒÍÀ?" input rsvcrcl logic REASOH: ÅÑËÈ ÄÅÔÅÊÒÛ ÍÅ ÆÈÐÍÛÅ ÏßÒÍÀ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÐÆÀÂÛÅ ÏßÒÍÀ. COMMENT: ßÂËßÞÒÑß ËÈ ÏßÒÍÀ ÐÆÀÂÛÌÈ.
RULE: R11 IF: not rsvcrcl THEN: reasons="ÏÐÈ×ÈÍÀ ÏÎßÂËÅÍÈß ÝÒÈÕ ÏßÒÅÍ ÌÍÅ" reasons=reasons+" ÍÅÈÇÂÅÑÒÍÀ." ways="ÏÎÏÐÎÁÓÉÒÅ ÎÁÐÀÒÈÒÜÑß Ê ÁÎËÅÅ ÎÏÛÒÍÎÌÓ" ways=ways+" ÑÏÅÖÈÀËÈÑÒÓ." REASOH: ÅÑËÈ ÏÎßÂÈËÈÑÜ ÊÀÊÈÅ-ÒÎ ÄÐÓÃÈÅ ÏßÒÍÀ,ÒÎ ÍÈ×ÅÃÎ ÏÓÒÍÎÃÎ ÏÎÑÎÂÅÒÎÂÀÒÜ ÂÀÌ ß ÍÅ ÌÎÃÓ. ÑÎÌÌÅÍÒ: ÊÀÊÈÅ-ÒÎ ÍÅÇÀÐÅÇÅÐÂÈÐÎÂÀÍÍÛÅ ÏßÒÍÀ ÍÀ ÏÎÂÅÐÕÍÎÑÒÈ.
RULE: R12 IF: rsvcrcl ÒÍÅÍ: reasons="ÏÐÎÈÑÕÎÄÈÒ ÏÐÎÑÀ×ÈÂÀÍÈÅ ÑÌÎËÈÑÒÛÕ ÂÅÙÅÑÒ " reasons=reasons+"×ÅÐÅÇ ØÒÓÊÀÒÓÐÊÓ È ÊÐÀÑÊÓ." ways="ÓÄÀËÈÒÜ ÑÒÀÐÛÉ ÍÀÁÅË, ÏÐÎÌÛÒÜ ÒÅÏËÛÌ Ç% ÐÀÑÒÂ." ways=ways+"ÑÎËßÍÎÉ ÊÈÑËÎÒÛ È, ÅÑËÈ ÏßÒÍÀ ÍÅÂÅËÈÊÈ" ways=ways+", ÎÒÃÐÓHTOBATÜ ÌÅÄÍÎÊÓÏÎÐÎÑÍÎÉ ÃÐÓÍÒÎÂÊÎÉ" ways=ways+" ÁÅÇ ÌÅËÀ, À ÏÐÈ ÁÎËÜØÈÕ ÐÀÇÌÅÐÀÕ - ÙÅË" ways=ways+"Î×ÍÛÌ, ÑÏÈÐÒÎÂÛÌ ÈËÈ ÊÀÍÈÔÎËÜÍÛÌ ËÀÊÎÌ." REASON: ÅÑËÈ ÆÈÐÍÛÅ ÏßÒÍÀ ÍÀ ØÒÓÊÀÒÓÐÊÅ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÆÈÐÍÛÕ ÏßÒÅÍ ÍÀ ØÒÓÊÀÒÓÐÊÅ.
RULE: R13 IF: lines THEN: reasons="ÍÅÄÎÑÒÀÒÎ×ÍÎ ÏÅÐÅÌÅØÀÍÛ ÏÈÃÌÅÍÒÛ Â ÊÎËÅÐÅ," reasons=reasons+" ÏËÎÕÎÐÀÑÒÓØÅÂÀÍ ÊÎËÅÐ." ways="ÏÐÎÌÛÒÜ ÏÎÂÅÐÕÍÎÑÒÜ È ÎÊÐÀÑÈÒÜ ÈÇ " ways=ways+"KPACKOÏÓËÜÒÀ." REASON: ÅÑËÈ ÏÎËÎÑÛ ÍÀ ÎÊÐÀØÅÍÍÎÉ ÏÎÂÅÐÕÍÎÑÒÈ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÏÎËÎÑ.
RULE: R14 IF: not lines THEN: reasons="ÏÐÈ×ÈÍÀ ÏÎßÂËÅÍÈß ÄÐÓÃÈÕ ÄÅÔÅÊÒΠÌÍÅ" reasons=reasons+" ÍÅÈÇÂÅÑÒÍÀ." ways="ÏÎÏÐÎÁÓÉÒÅ ÎÁÐÀÒÈÒÜÑß Ê ÁÎËÅÅ ÎÏÛÒÍÎÌÓ" ways=ways+"ÑÏÅÖÈÀËÈÑÒÓ." REASON: ÅÑËÈ ÏÎßÂÈËÈÑÜ ÊÀÊÈÅ-ÒÎ ÄÐÓÃÈÅ ÄÅÔÅÊÒÛ, ÒÎ ÍÈ×ÅÃÎ ÏÓÒÍÎÃÎ ÏÎÑÎÂÅÒÎÂÀÒÜ ÂÀÌ ß ÍÅ ÌÎÃÓ. COMMENT: ÊÀÊÈÅ-ÒÎ ÍÅÇÀÐÅÇÅÐÂÈÐÎÂÀÍÍÛÅ ÄÅÔÅÊÒÛ ÍÀ ÏÎÂÅÐÕÍÎÑÒÈ.
VAR: defects LABEL: ÍÀËÈ×ÈÅ ÄÅÔÅÊÒΠÍÀ ÎÊÐÀØÅÍÍÎÉ ÏÎÂÅÐÕÍÎÑÒÈ.
END:
 Âàðèàíòå 3 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) ïîÿâëåíèå ïóçûðåé íà îêðàøåííîé ïîâåðõíîñòè; á) îòñëàèâàíèå êðàñêè ïîñëå âûñûõàíèÿ.
Âàðèàíò 4 GOAL: breaking
/*ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /*ÎÐÃÀÍÈÇÀÖÈÈ ÎÃÐÀÁËÅÍÈß ÁÀÍÊÀ. ÊÎÍÅ×ÍÎ, ÝÒÎ ÌÀËÅÍÜÊÈÉ */ /*ÍÀÁÎÐ È ÎÍ ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ ÑÀÌÛÕ */ /*ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. ÒÀÊ ×ÒÎ ÍÅ ÎÆÈÄÀÉÒÅ ×ÅÃÎ-ËÈÁÎ */ /*ÌÎÙÍÎÃÎ. ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ */ /*ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÊÎÉ */ /*(ÄÀ-TRUE, HET-FALSE) */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output "ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output " ÂÑÅ ÕÎÒßÒ ÎÃÐÀÁÈÒÜ ÁÀÍÊ, ÄÀ ÍÅ ÂÑÅ ÌÎÃÓÒ..." output "ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ Â ÝÒÎÌ ÍÅÏÐÎÑÒÎÌ ÄÅËÅ." output " ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ ÂÑÞ" output " ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÏÎÅÕÀËÈ..." output at 17,10 output "ÑÊÎËÜÊÎ Ó ÂÀÑ ÂÅÐÍÛÕ ËÞÄÅÉ?" input people num using "nn" at 19,10 output "ÑÊÎËÜÊÎ Ó ÂÀÑ 'ÑÒÂÎËÎÂ'?" input guns num using "nn" at 21,10 output " À ÑÊÎËÜÊÎ ÂÛ ÕÎÒÈÒÅ ÂÇßÒÜ?" input nmoney num output clear
DO: clear output output " ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ, ËÞÁÅÇÍÅÉØÈÉ." output output breaking
RULE: R1 IF: nmoney >=10000000 THEN: output output "A Ó ÂÀÑ ÃÓÁÀ ÍÅ ÄÓÐÀ!" output "À ÑÊÎËÜÊÎ ÄÅÍÅà ÕÐÀÍÈÒÑß Â ÁÀÍÊÅ " output "ÍÀËÈ×ÍÛÌÈ?" input emoney num REASON: ÅÑËÈ ÂÛ ÒÀÊ ÌÍÎÃÎ ÕÎÒÈÒÅ ÂÇßÒÜ, ÒÎ ÑËÅÄÓÅÒ ÇÍÀÒÜ, ÐÀÑÏÎËÀÃÀÅÒ ËÈ ÁÀÍÊ ÒÀÊÎÉ ÑÓÌÌÎÉ. COMMENT: ÂÛ ÒÀÊ ÌÍÎÃÎ ÕÎÒÈÒÅ ÂÇßÒÜ, ÑËÅÄÎÂÀÒÅËÜÍÎ. ÑËÅÄÓÅÒ ÇÍÀÒÜ, ÐÀÑÏÎËÀÃÀÅÒ ËÈ ÁÀÍÊ ÒÀÊÎÉ ÑÓÌÌÎÉ.
RULE: R2 IF: nmoney<10000000 THEN: output "A ÑÊÎËÜÊÎ ÄÅÍÅà ÕÐÀÍÈÒÑß Â ÁÀÍÊÅ ÍÀËÈ×ÍÛÌÈ?" input emoney num REASON: ÅÑËÈ ÂÛ ÕÎÒÈÒÅ ÎÃÐÀÁÈÒÜ ÁÀÍÊ, ÒÎ ÑËÅÄÓÅÒ ÇÍÀÒÜ, ÐÀÑÏÎËÀÃÀÅÒ ËÈ ÎÍ ÒÀÊÎÉ ÑÓÌÌÎÉ. COMMENT: ÂÛ ÕÎÒÈÒÅ ÂÇßÒÜ ×ÓÆÈÅ ÄÅÍÜÃÈ, ÑËÅÄÎÂÀÒÅËÜÍÎ, ÑËÅÄÓÅÒ ÇÍÀÒÜ, ÐÀÑÏÎËÀÃÀÅÒ ËÈ ÁÀÍÊ ÒÀÊÎÉ ÑÓÌÌÎÉ.
RULE: R3 IF: nmoney<emoney THEN: output output "È ÒÀÊ, ÂÛ ÐÅØÈËÈÑÜ ÍÀ ÄÅËÎ, À ÊÀÊ ÎÁÑÒÎßÒ" output "ÄÅËÀ Ñ ÎÕÐÀÍÎÉ?" output output "ÎÕÐÀÍßÅÒÑß ËÈ ÁÀÍÊ ÄÍÅÌ?" input dayctrl logic output output "ÎÕÐÀÍßÅÒÑß ËÈ ÁÀÍÊ ÏÎËÈÖÅÉÑÊÈÌÈ ÍÎ×ÜÞ?" input nitectrl logic REASON: ÅÑËÈ Â ÁÀÍÊÅ ÄÎÑÒÀÒÎ×ÍÎ ÄÅÍÅÃ, ÒÎ ÍÀ×ÈÍÀÅÌ ÑÎÁÈÐÀÒÜ ÈÍÔÎÐÌÀÖÈÞ ÎÁ ÎÕÐÀÍÅ. COMMENT: ÁÀÍÊ ÈÌÅÅÒ ÄÎÑÒÀÒÎ×ÍÎ ÑÐÅÄÑÒ ÄËß ÓÄÎÂËÅÒÂÎÐÅÍÈß ÂÀØÈÕ ÏÎÒÐÅÁÍÎÑÒÅÉ. ÓÇÍÀÅÌ, ÎÕÐÀÍßÅÒÑß ËÈ ÎÍ ÄÍÅÌ È ÍÎ×ÜÞ.
RULE: R4 IF: dayctrl THEN: output output "ÑÊÎËÜÊÎ ×ÅËÎÂÅÊ ÑÒÎÈÒ ÍÀ ÎÕÐÀÍÅ ÁÀÍÊÀ ÄÍÅÌ?" input dayñol num using "nn" output output "ÏÐÎÑÌÀÒÐÈÂÀÅÒÑß ËÈ ÏÎÌÅÙÅÍÈÅ ÁÀÍÊÀ" output "ÂÈÄÅÎÊÀÌÅÐÎÉ?" input kamera logic REASON: ÅÑËÈ ÄÍÅÌ ÁÀÍÊ ÎÕÐÀÍßÅÒÑß, ÒÎ ÍÀÄÎ ÓÇÍÀÒÜ ÊÎË-ÂÎ ÎÕÐÀÍÛ È ÏÎËÓ×ÈÒÜ ÈÍÔÎÐÌÀÖÈÞ Î ÍÀËÈ×ÈÈ Â ÏÎÌÅÙÅÍÈÈ ÁÀÍÊÀ ÂÈÄÅÎÊÀÌÅÐÛ. COMMENT: ÅÑËÈ Ó ÂÕÎÄÀ ÄÍÅÌ ÑÒÎßÒ ÏÎËÈÖÅÉÑÊÈÅ, ÒÎ ÍÀÄÎ ÓÇÍÀÒÜ ÑÊÎËÜÊÎ ÈÕ, È ÏÐÎÑÌÀÒÐÈÂÀÅÒÑß ËÈ ÏÎÌÅÙÅÍÈÅ ÂÈÄÅÎÊÀÌÅÐÎÉ
RULE: R5 IF: nitectrl THEN: output output"ÑÊÎËÜÊÎ ×ÅËÎÂÅÊ ÑÒÎÈÒ ÍÀ ÎÕÐÀÍÅ ÁÀÍÊÀ ÍÎ×ÜÞ?" input nitecol num using "nn" output output "ÌÎÆÅÒÅ ËÈ ÂÛ ÎÒÊËÞ×ÈÒÜ ÑÈÃÍÀËÈÇÀÖÈÞ," output "×ÒÎÁÛ ÎÍÀ ÍÅ ÑÐÀÁÎÒÀËÀ?" input signal logic REASON: ÅÑËÈ ÍÎ×ÜÞ ÁÀÍÊ ÎÕÐÀÍßÅÒÑß, TO ÍÀÄÎ ÓÇÍÀÒÜ ÊÎË-ÂÎ ÎÕÐÀÍÍÈÊÎÂ È ÌÎÆÍÎ ËÈ ÎÒÊËÞ×ÈÒÜ, ÑÈÃÍÀËÈÇÀÖÈÞ. COMMENT: ÅÑËÈ ÍÎ×ÜÞ ÁÀÍÊ ÎÕÐÀÍßÞÒ ÏÎËÈÖÅÉÑÊÈÅ, ÒÎ ÍÀÄÎ ÓÇÍÀÒÜ ÑÊÎËÜÊÎ ÈÕ È ÌÎÆÍÎ ËÈ ÎÒÊËÞ×ÈÒÜ ÑÈÃÍÀËÈÇÀÖÈÞ.
RULE: R6 IF: not nitectrl THEN: output output "ÌÎÆÅÒÅ ËÈ ÂÛ ÎÒÊËÞ×ÈÒÜ ÑÈÃÍÀËÈÇÀÖÈÞ," output " ×ÒÎÁÛ ÎÍÀ ÍÅ ÑÐÀÁÎÒÀËÀ?" input signal logic REASON: ÅÑËÈ ÍÎ×ÜÞ ÁÀÍÊ ÍÅ ÎÕÐÀÍßÅÒÑß, ÒÎ ÍÀÄÎ ÓÇÍÀÒÜ, ÂÎÇÌÎÆÍÎ ËÈ ÎÒÊËÞ×ÈÒÜ ÑÈÃÍÀËÈÇÀÖÈÞ. COMMENT: ÅÑËÈ ÍÎ×ÜÞ ÁÀÍÊ ÍÅ ÎÕÐÀÍßÞÒ ÏÎËÈÖÅÉÑÊÈÅ, ÒÎ ÂÎÇÌÎÆÍÎ ËÈ ÎÒÊËÞ×ÈÒÜ ÑÈÃÍÀËÈÇÀÖÈÞ.
RULE: R7 IF: not nitectrl and signal THEN: breaking="ÎÏÅÐÀÖÈÞ ÍÀÄÎ ÍÀ×ÈÍÀÒÜ Â 2 ×ÀÑÀ 17 ÌÈÍÓÒ" breaking=breaking+" ÏÎ ÌÅÑÒÍÎÌÓ ÂÐÅÌÅÍÈ." REASON: ÅÑËÈ ÁÀÍÊ ÍÎ×ÜÞ ÏÎÄ ÏËÎÕÎÉ ÎÕÐÀÍÎÉ, ÒÎ ÎÃÐÀÁËÅÍÈÅ ÏÐÎÉÄÅÒ ÂÏÎËÍÅ ÓÑÏÅØÍÎ. ÃËÀÂÍÎÅ ÍÀ×ÀÒÜ ÅÃÎ Â 2 ×ÀÑÀ 17 ÌÈÍÓÒ.  ÍÎ×Ü ÍÀ ÏßÒÍÈÖÓ. COMMENT: ÒÀÊÈÅ ÁÀÍÊÈ ÍÀÄÎ ÁÐÀÒÜ ÍÎ×ÜÞ.
RULE: R8 IF: not nitectrl and not signal and dayctrl THEN: breaking="ÎÏÅÐÀÖÈÞ ÍÀÄÎ ÍÀ×ÈÍÀÒÜ Â 2 ×ÀÑÀ 17 ÌÈÍÓÒ " breaking=breaking+"ÏO ÌÅÑÒÍÎÌÓ ÂÐÅÌÅÍÈ. ÍÎ ÁÓÄÜÒÅ " breaking=breaking+" OCTOPOÆÍÛ, BAM ÍÀÄÎ ÂÑÅ ÑÄÅËÀÒÜ" breaking=breaking+" ÇÀ 15 ÌÈÍÓÒ. ÒÐÅÍÈÐÓÉÒÅÑÜ!" REASON: ÅÑËÈ ÁÀÍÊ ÍÎ×ÜÞ ÏÎÄ ÏËÎÕÎÉ ÎÕÐÀÍÎÉ, ÒÎ ÎÃÐÀÁËÅÍÈÅ ÏÐÎÉÄÅÒ ÂÏÎËÍÅ ÓÑÏÅØÍÎ. ÃËÀÂÍÎÅ ÍÀ×ÀÒÜ ÅÃÎ Â 2 ×ÀÑÀ 17 ÌÈÍÓÒ.  ÍÎ×Ü ÍÀ ÏßÒÍÈÖÓ. È Ó×ÒÈÒÅ, Ó ÂÀÑ ÂÑÅÃÎ 15 ÌÈÍÓÒ. COMMENT: ÒÀÊÈÅ ÁÀÍÊÈ ÍÀÄÎ ÁÐÀÒÜ ÍÎ×ÜÞ.
RULE: R9 IF: (nitectrl or not signal and not nitectrl) and not dayctrl and not kamera THEN: breaking="TAKOÉ ÁÀÍÊ ÍÀÄÎ ÁÐÀÒÜ Â 16 ×ÀÑΠ45 ÌÈÍÓÒ" breaking=breaking+" ÂÄÂÎÅÌ, ÈÌÅß ÏÐÈ ÑÅÁÅ ÏÈÑÒÎËÅÒÛ." REASON: ÅÑËÈ ÁÀÍÊ ÍÎ×ÜÞ ÏÎÄ ÎÕÐÀÍÎÉ ÈËÈ ÑÈÃÍÀËÈÇÀÖÈÅÉ, ÍÎ ÄÍÅÉ ÁÐÎØÅÍ ÍÀ ÏÐÎÈÇÂÎË ÑÓÄÜÁÛ, ÒÎ ÎÃÐÀÁËÅÍÈÅ ÏÐÎÉÄ¨Ò ÂÏÎËÍÅ ÓÑÏÅØÍÎ. ÃËÀÂÍÎÅ ÍÀ×ÀÒÜ ÅÃÎ Â 16 ×ÀÑΠ45 ÌÈÍÓÒ Â ÏßÒÍÈÖÓ. COMMENT: ÒÀÊÈÅ ÁÀÍÊÈ ÍÀÄÎ ÁÐÀÒÜ ÄÍÅÌ ÏÐÈ ÂÑÅÌ ×ÅÑÒÍÎÌ ÍÀÐÎÄÅ.
RULE: R10 IF: (nitectrl or not signal and not nitectrl) and not dayctrl and kamera THEN: breaking="TAKOÉ ÁÀÍÊ ÍÀÄÎ ÁÐÀÒÜ Â 16 ×ÀÑΠ45 ÌÈÍÓÒ" breaking=breaking+" ÂÄÂÎÅÌ, ÈÌÅß ÏÐÈ ÑÅÁÅ ÏÈÑÒÎËÅÒÛ" breaking=breaking+" È ÌÀÑÊÈ." REASON: ÅÑËÈ ÁÀÍÊ ÍÎ×ÜÞ ÏÎÄ ÎÕÐÀÍÎÉ ÈËÈ ÑÈÃÍÀËÈÇÀÖÈÅÉ, ÍÎ ÄÍÅÌ ÁÐÎØÅÍ ÍÀ ÏÐÎÈÇÂÎË ÑÓÄÜÁÛ, ÒÎ ÎÃÐÀÁËÅÍÈÅ ÏÐÎÉÄÅÒ ÂÏÎËÍÅ ÓÑÏÅØÍÎ. ÃËÀÂÍÎÅ ÍÀ×ÀÒÜ ÅÃÎ Â 16 ×ÀÑΠ45 ÌÈÍÓÒ Â ÏßÒÍÈÖÓ. COMMENT: ÒÀÊÈÅ ÁÀÍÊÈ ÍÀÄÎ ÁÐÀÒÜ ÄÍÅÌ ÏÐÈ ÂÑÅÌ ×ÅÑÒÍÎÌ ÍÀÐÎÄÅ.
RULE: R11 IF: dayctrl and nitectrl and (people<nitecol or guns<daycol) THEN: breaking="ÑÈÄÅËÈ ÁÛ ÂÛ ËÓ×ØÅ ÄÎÌÀ È ÍÅ ÐÛÏÀËÈÑÜ " breaking=breaking+"ÏÎÍÀÏÐÀÑÍÓ."
RULE: R12 IF: (people or guns)<l and not signal THEH: breaking="ÑÈÄÅËÈ ÁÛ ÂÛ ËÓ×ØÅ ÄÎÍÀ È ÍÅ ÐÛÏÀËÈÑÜ " breaking=breaking+"ÏÎÍÀÏÐÀÑÍÓ ÏÐÈ ÒÀÊÎÌ ÐÀÑÊËÀÄÅ " breaking=breaking+"BÛ ÎÁßÇÀÒÅËÜÍÎ ÏÎÏÀÄÅÒÅÑÜ. ÌÎÉ " breaking=breaking+"BAM ÑÎÂÅÒ: ÈÙÈÒÅ ËÞÄÅÉ È " breaking=breaking+"ÏÐÈÎÁÐÅÒÀÉÒÅ ÎÐÓÆÈÅ."
RULE: R13 IF: not dayctrl and people>1 and guns>l and nitectrl THEN: breaking="Ó ÂÀÑ ÍÅÏËÎÕÈÅ ØÀÍÑÛ ÍÀ ÓÑÏÅÕ ÏÐÈ ÐÀÁÎÒÅ" breaking=breaking+" ÄÍÅÌ. È ÅÑËÈ ÂÛ ÇÀÕÂÀÒÈÒÅ ÄÂÓÕ " breaking=breaking+"CAMHX ËÎÂÊÈÕ ÐÅÁßÒ, ÒÎ ÏÐÈ " breaking=breaking+"ÍÅÏËÎÕÎÌ ÐÀÑÊËÀÄÅ ÂÛ ÑÄÅËÀÅÒÅ ÝÒÎ" breaking=breaking+" ÓÑÏÅØÍÎ. ÄÀ, È ÍÅ ÇÀÁÓÄÜÒÅ ÌÀÑÊÈ," breaking=breaking+"TAM ÍÀÂÅÐÍßÊÀ ÓÑÒÀÍÎÂËÅÍÀ " breaking=breaking+"BÈÄEOKAMEÐÀ." COMMENT: ÄÍÅÌ ÁÀÍÊ ÍÅ ÎÕÐÀÍßÅÒÑß.
RULE: R14 IF: daycol<min(people,guns)-2 and nitecol>daycol+l THEN: breaking="ËÓ×ØE ÂÑÅÃÎ ÁÐÀÒÜ ÝÒÎÒ ÁÀÍÊ ØÒÓÐÌÎÌ," breakine=breaking+"TAK ÊÀÊ Ó ÂÀÑ ÂÏÎËÍÅ ÄÎÑÒÀÒÎ×ÍÎ" breaking=breaking+" ËÞÄÅÉ. ÍÎ ÑÒÎÈÒ ËÈ ÄÅËÀÒÜ ÝÒÎ?" COMMENT: ÄÍÅÌ ÊÎÍÒÐÎËÜ ÏÎÑËÀÁÅÅ, ×ÅÌ ÍÎ×ÜÞ.
VAR: GUNS LABEL: ÊÎË-ÂÎ ÈÌÅÞÙÈÕÑß Â ÂÀØÅÌ ÐÀÑÏÎÐßÆÅÍÈÈ ÅÄ. ÎÃÍÅÑÒÐÅËÜÍÎÃÎ ÎÐÓÆÈß.
VAR: NMONEY LABEL: ÏËÀÍÈÐÓÅÌÀß ÑÓÌÌÀ ÎÃÐÀÁËÅÍÈß.
VAR: PEOPLE LABEL: ÊÎË-ÂÎ ×ËÅÍΠÂÀØÅÉ ÒÓÑÎÂÊÈ.
END:
 âàðèàíòå 4 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) îãðàáëåíèå òðàíñïîðòà, ïåðåâîçÿùåãî áàíêîâñêèå öåííîñòè; á) îãðàáëåíèå áàíêà â óñëîâèÿõ ñòèõèéíîãî áåäñòâèÿ.
Âàðèàíò 5 GOAL: dinner
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ. ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /*ÏÐÈÃÎÒÎÂËÅÍÈÞ ÎÁÅÄÀ ÍÀ ÆÅËÀÅÌÎÅ ×ÈÑËÎ ÏÅÐÑÎÍ Â */ /* ÇÀÂÈÑÈÌÎÑÒÈ ÎÒ ÍÀÁÎÐÀ È ÊÎËÈ×ÅÑÒÂÀ ÏÐÎÄÓÊÒÎÂ, */ /* ÈÌÅÞÙÈÕÑß Â ÂÀØÅÌ ÐÀÑÏÎÐßÆÅÍÈÈ. ÑÎÎÁÙÈÒ ÏÐÈ×ÈÍÛ */ /*ÏÎßÂËÅÍÈß ÈÌÅÍÍÎ ÝÒÈÕ ÑÎÂÅÒÎÂ. */ /* ÊÎÍÅ×ÍÎ, ÝÒÎ ÄÀËÅÊÎ ÍÅ ÏÎËÍÛÉ ÍÀÁÎÐ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀ- */ /*ÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. ÒÀÊ ×ÒÎ */ /* ÍÅ ÈÙÈÒÅ Â ÍÅÌ ×ÅÃÎ-ËÈÁÎ ÑÂÅÐÕÈÍÒÅËËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-Y, HET-N) */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output " ÏÎØÀÐÈ  ÑÂÎÅÌ ÕÎËÎÄÈËÜÍÈÊÅ È ÎÁÍÀÐÓÆÈ ÒÀÌ " output "ÊÎÅ-ÊÀÊÈÅ ÇÀÏÀÑÛ, ÂÛ ÐÅØÈËÈ ×ÒÎ-ÍÈÁÓÄÜ ÑÎÑÒÐßÏÀÒÜ. ÍÎ " output "×ÒÎ ÈÌÅÍÍÎ ÂÛ ÅÙÅ ÍÅ ÏÐÈÄÓÌÀËÈ. ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ " output "ÂÀÌ ÑÎÂÅÒ, ÊÀÊ ÈÇ ÈÌÅÞÙÈÕÑß ÏÐÎÄÓÊÒΠÑÄÅËÀÒÜ ÍÅ×ÒÎ" output " ÑÚÅÄÎÁÍÎÅ. ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ " output "ÂÑÞ ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÍÀ×ÍÅÌ..." meatexst="Y" output " ÑÊÀÆÈÒÅ, ÂÛ ÍÀØËÈ Â ÕÎËÎÄÈËÜÍÈÊÅ ÌßÑÎ (Y/N)?" input meatexst str using "a"
DO: clear output " ÂÎÒ ×ÒÎ ÌÍÅ ÊÀÆÅÒÑß ÏÐÈÅÌËÅÌÛÌ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output output dinner
RULE: Rl IF: meatexst<>"Y" or meatexst<>"y" THEN: output " ÈÇÂÈÍÈÒÅ, À ÂÛ ÂÅÃÅÒÀÐÈÀÍÅÖ (Y/N)?" input vegitar str using "a"
RULE: R2 IF: (meatexst<>"Y" or meatexst<>"y") and (vegitar<>"y" or vegitar<>"Y") THEN: dinner=" ËÓ×ØÅ ÂÑÅÃÎ ÂÎÇÜÌÈÒÅ ÑÂÎÉ ÒÎËÑÒÛÉ ÁÓÌÀÆÍÈÊ" dinner=dinner+" È ÎÒÏÐÀÂËßÉÒÅÑÜ Â ÐÅÑÒÎÐÀÍ, ÈÁÎ ÁÅÇ " dinner=dinner+"MßCA ÍÎÐÌÀËÜÍÎÃÎ ÎÁÅÄÀ ÍÅ ÏÎËÓ×ÈÒÑß "
RULE: R3 IF: vegitar="y" or vegitar="Y" THEN: output output " ÍÓ, ÐÀÇ ÂÛ ÂÅÃÅÒÀÐÈÀÍÅÖ, ÒÎ, ÍÀÂÅÐÍÎ,ÎÂÎÙÅÉ " output "Ó ÂÀÑ ÍÀÂÀËÎÌ (Y/N)?" input vagitables str using "a"
RULE: R4 IF: meatexst="Y" or meatexst="y" THEN: output output " ÑÊÎËÜÊÎ ÃÐÀÌÌ ÌßÑÀ ÂÛ ÈÌÅÅÒÅ?" input howmeat num using "nnnn" output output " ÍÀ ÑÊÎËÜÊÎ ÏÅÐÑÎÍ ÇÀÄÓÌÀÍ ÂÀØ ÎÁÅÄ?" input howfamily num using "n"
RULE: R5 IF: meatexst<>"Y" or meatexst<>"y" THEN: output output " ÈÇÂÈÍÈÒÅ, À ÂÛ ÂÅÃÅÒÀÐÈÀÍÅÖ (Y/N)?" input vegitar str using "a"
RULE: R6 IF: howmeat/howfamily>300 THEN: dinner="ËÓ×ØÅ ÂÑÅÃÎ ÂÎÇÜÌÈÒÅ ÝÒÎÒ ÊÓÑÎÊ ÌßÑÀ," dinner=dinner+"ÏOPEÆTE ÅÃÎ ÂÄÎËÜ ÂÎËÎÊÎÍ ÍÀ " dinner=dinner+"HETOËCTÛE ÏËÀÑÒÛ, ÎÒÁÅÉÒÅ, ÍÀØÏÈÃÓÉÒÅ" dinner=dinner+" È ÍÀ 30 ÌÈÍ. ÎÒËÎÆÈÒÅ. ÇÀÒÅÌ ÁÅÐÅÒÅ" dinner=dinner+" ÑÊÎÂÎÐÎÄÓ È ÆÀÐÈÒÅ ÍÀ ÌÅÄËÅÍÍÎÌ " dinner=dinner+"ÎÃHE. ÊÀÊ ÃÎÂÎÐÈÒÑß, ÑÎËÜ, ÀÍÀÍÀÑÛ," dinner=dinner+" ÔÈÑÒÀØÊÈ - ÏÎ ÂÊÓÑÓ."
RULE: R7 IF: (howmeat/howfamily>80) and (howmeat/howfamily<=300) THEN: enoughmeat=true
RULE: R8 IF: enoughmeat THEN: output output " ÌßÑÎ - ÝÒÎ ÇÀËÎà ÓÑÏÅÕÀ." output output"ÈÌÅÅÒÑß ËÈ Â ÂÀØÅÌ ÐÀÏÎÐßÆÅÍÈÈ ÊÀÏÓÑÒÀ (Y/N)?" input kapusta str using "a" output input svekla str using "a" with " ÑÂÅÊËÀ (Y/N)?". output input potetou str using "a" with " ÊÀÐÒÎÔÅËÜ (Y/N)?"
RULE: R9 IF: (kapusta="y" or kapusta="Y") and (svekla="y" or svekla="Y") and THEN: dinner=" ÂÀÐÈÒÅ ÓÊÐÀÈÍÑÊÈÉ ÁÎÐÙ."
RULE: R10 IF: howmeat/howfamily<=80 THEN: enoughmeat=false
RULE: R11 IF: not enoughmeat THEN: dinner=" ÌßÑÀ Î×ÅÍÜ ÌÀËÎ, ×ÒÎÁÛ ÏÐÈÃÎÒÎÂÈÒÜ ÏÅÐÂÎÅ ÈËÈ" dinner=dinner+"BTOPOE, HO, ÁÛÒÜ ÌÎÆÅÒ, ÅÃÎ ÕÂÀÒÈÒ ÍÀ " dinner=dinner+"ÌßÑÍÎÉ ÑÀËÀÒ."
RULE: R12 IF: vagitables="Y" or vagitables="y" THEN: dinner=" ÑÂÀËÈÒÅ ÂÑÅ Â ÎÄÍÓ ÊÓ×Ó, ÇÀÒÅÌ ÌÅËÊÎ ÏÎÊÐÎØÈÒÅ" diriner=dinner+"(ÌÎÆÍÎ ÏÐÎÏÓÑÒÈÒÜ ×ÅÐÅÇ ÌßÑÎÐÓÁÊÓ)," dinner=dinner+" ÏÅÐÅËÎÆÈÒÅ ÏÎËÓ×ÈÂØÓÞÑß ÌÀÑÑÓ Â " dinner=dinner+"ÑÀËÀÒÍÈÖÛ È ÏÎÄÀÂÀÉÒÅ Ê ÑÒÎËÓ. ÅÑËÈ ÂÀÌ " dirmer=dinner+':ÏÎBE3ET, TO ÂÑÅ ÁÓÄÓÒ ÄÎÂÎËÜÍÛ. ÅÑËÈ ÍÅÒ -" dinner=dinner+" HE ÎÁÅÑÑÓÄÜÒÅ."
VAR: DINNER FIND: dinner="ÏÐÈ×ÈÍÀ ÏÎßÂËÅÍÈß ÝÒÈÕ ÍÅÏÎËÀÄÎÊ ÍÀÌ ÍÅÈÇÂÅÑÒÍÀ." LABEL: ÊÀÊ ÏÎÑÒÓÏÈÒÜ, ÅÑËÈ ÍÓÆÍÎ ÏÐÈÃÎÒÎÂÈÒÜ ÎÁÅÄ.
VAR: MEATEXST LABEL: ÍÀËÈ×ÈÅ ÌßÑÀ  ÂÀØÅÌ ÕÎËÎÄÈËÜÍÈÊÅ.
VAR: ENOUGHMEAT LABEL: ÄÎÑÒÀÒÎ×ÍÎ ËÈ ÌßÑÀ ÄËß ÎÄÍÎÃÎ ÈÇ ÏÅÐÂÛÕ ÁËÞÄ.
VAR: HOWMEAT LABEL: ÏÐÈÌÅÐÍÛÉ ÂÅÑ ÊÓÑÊÀ ÌßÑÀ.
VAR: HOWFAMILY LABEL: ÊÎËÈ×ÅÑÒÂÎ ÏÅÐÑÎÍ, ÏÐÈÃËÀØÅÍÍÛÕ ÍÀ ÎÁÅÄ.
VAR: KAPUSTA LABEL: ÅÑÒÜ ËÈ Â ÄÎÌÅ ÊÀÏÓÑÒÀ.
VAR: SVEKLA LABEL: ÅÑÒÜ ËÈ Â ÄÎÌÅ ÑÂÅÊËÀ.
VAR: POTETOU LABEL: ÅÑÒÜ ËÈ Â ÄÎÌÅ ÊÀÐÒÎÔÅËÜ.
VAR: VEGITAR LABEL: ßÂËßÅÒÅÑÜ ËÈ ÂÛ ÂÅÃÅÒÀÐÈÀÍÖÅÌ.
END:
 âàðèàíòå 5 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) íàëè÷èå â õîëîäèëüíèêå ñûðà; á) íàëè÷èå â õîëîäèëüíèêå ïèâà.
Âàðèàíò 6 GOAL: whattodo
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÍÀ */ /* ÒÅÌÓ "ÊÀÊ ÓÑÏÅÒÜ ÍÀ ÝÊÇÀÌÅÍ",  ÇÀÂÈÑÈÌÎÑÒÈ ÎÒ ÎÏÎÇÄÀÍÈß È*/ /* ÂÀÆÍÎÑÒÈ ÑÂÎÅÂÐÅÌÅÍÍÎÃÎ ÏÐÈÕÎÄÀ. Î×ÅÂÈÄÍÎ, ×ÒÎ ÝÒÎ */ /* ÄÀËÅÊÎ ÍÅ ÏÎËÍÛÉ ÍÀÁÎÐ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß */ /* ÏÎÊÀÇÀ ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. ÒÀÊ ×ÒÎ ÍÅ */ /* ÈÙÈÒÅ Â ÍÅÌ ÑÂÅÐÕÈÍÒÅËËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-Y, ÍÅÒ-N) */ /* ÍÓ, È ÊÎÍÅ×ÍÎ, ÍÀ ÏÐÎÑÜÁÓ ÑÈÑÒÅÌÛ ÂÂÅÑÒÈ ÑÎÎÒÂÅÒ- */ /* ÑÒÂÓÞÙÅÅ ×ÈÑËÎ. */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output " Ó ÂÀÑ ÑÅÃÎÄÍß ÝÊÇÀÌÅÍ, À ÂÛ ÏÐÎÑÍÓËÈÑÜ ÑËÈØÊÎÌ " output "ÏÎÇÄÍÎ... ÂÀÌ, ÅÑÒÅÑÒÂÅÍÍÎ, ÍÀÄÎ ÓÑÏÅÒÜ ÍÀ ÍÅÃÎ, ÍÎ " output "ÊÀÊ? ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ, ÊÀÊ, ÈÑÕÎÄß ÈÇ " output "ÑËÎÆÈÂØÅÉÑß ÑÈÒÓÀÖÈÈ, ÂÀÌ ÑËÅÄÓÅÒ ÏÎÑÒÓÏÈÒÜ. ÍÎ ÄËß " output "ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ ÂÑÞ ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÍÀ×ÍÅÌ..." output lating="Y" output" ÑÊÀÆÈÒÅ, ÂÛ ÄÅÉÑÒÂÈÒÅËÜÍÎ ÎÏÀÇÄÛÂÀÅÒÅ (Y/N)?" input lating str using "a"
DO: clear output " ÂÎÒ ×ÒÎ ÌÍÅ ÊÀÆÅÒÑß ÏÐÈÅÌËÅÌÛÌ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output output whattodo
RULE: Rl IF: mainexam and biglate THEN: whattodo=" ÁÅÐÈÒÅ ÒÀÊÑÈ ÍÀ ÂÅÑÜ ÏÓÒÜ ÄÎ ÈÍÑÒÈÒÓÒÀ. Â" whattodo=whattodo+"TAKÎÉ ÑÈÒÓÀÖÈÈ ÄÅÍÜÃÈ ÇÍÀ×ÅÍÈß ÍÅ " whattbdo=whattodo+"ÈÌÅÞT."
RULE: R2 IF: not mainexam THEN: whattodo=" ÓÑÏÎÊÎÈÒÅÑÜ, ÍÀ ÍÅ Î×ÅÍÜ ÂÀÆÍÛÉ ÝÊÇÀÌÅÍ " whattodo=whattodo+"HE ÑÒÎÈÒ ÑÈËÜÍÎ ÑÏÅØÈÒÜ. ÏÎÂÅÐÜÒÅ," whattodo=whattodo+"BAM ÏÐÎÑÒßÒ ÂÀØÅ ÎÏÎÇÄÀÍÈÅ ÈËÈ ÄÀÆÅ" whattodo=whattodo+"ÎÒÑÓÒÑÒÂÈÅ. ÒÀÊ ×ÒÎ ÍÅÑÏÅØÀ ÏÎ-" whattodo=whattodo+"EÇÆAÉTE ÍÀ ÎÁÙÅÑÒÂÅÍÍÎÌ ÒÐÀÍÑÏÎÐÒÅ."
RULE: R3 IF: not biglate and mainexam THEN: whattodo=" HE ÂÎËÍÓÉÒÅÑÜ, ÂÑÅ ÅÙÅ ÁÓÄÅÒ ÕÎÐÎØÎ. ÂÀÌ " whattodo=whattodo+"ÑÒÎÈÒ ÂÇßÒÜ ÒÀÊÑÈ ÍÀ ×ÀÑÒÜ ÏÓÒÈ," whattodo=whattodo+" ÍÀÏÐÈÌÅÐ, ÄÎ ÊÀÊÎÃÎ-ÍÈÁÓÄÜ " whattodo=whattodo+"ÓÇËÎÂÎÃÎ ÏÓÍÊÒÀ (ÄÎ ÌÅÒÐÎ, ÀÂÒ." whattodo=whattodo+"OCTAHQBKÈ). "
RULE: R4 IF: onlyge4 THEN: mainexam=false
RULE: R5 IF: veroyatn >= 90 THEN: mainexam=false
RULE: R6 IF: (veroyatn <90) and not onlyge4 THEN: mainexam=true
ROLE: R7 IF: lating<>"Y" and lating<>"y" THEN: whattodo=" ÂÑÅ Â ÏÎÐßÄÊÅ. ÆÅËÀÞ ÂÀÌ ÍÈ ÏÓÕÀ."
RULE: R8 IF: howcommon<onwalk+bymetro+bybus+15 THEN: biglate=true
RULE: R9 IF: howcommon >= onwalk+bymetro+bybus+15 THEN: biglate=false
VAR: WHATTODO FIND: whattodo=" ÑÎÆÀËÅÞ, ß ÍÅ ÇÍÀÞ, ×ÒÎ ÂÀÌ ÏÎÑÎÂÅÒÎÂÀÒÜ..." LABEL: ÑÎÂÅÒ ÊÀÊ ÄÅÉÑÒÂÎÂÀÒÜ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ.
VAR: MAINEXAM LABEL: ÏÐÅÄÑÒÎßÙÈÉ ÝÊÇÀÌÅÍ - ÂÀÆÍÛÉ.
VAR: BIGLATE LABEL: ÒÅÊÓÙÅÅ ÎÏÎÇÄÀÍÈÅ - ÇÍÀ×ÈÒÅËÜÍÎÅ.
VAR: LATING LABEL: ÂÛ ÐÅÀËÜÍÎ ÎÏÀÇÄÛÂÀÅÒÅ.
VAR: HOWCOMMON FIND: output output " ÑÊÎËÜÊÎ ÌÈÍÓÒ ÂÀÌ ÄÎÁÈÐÀÒÜÑß ÄÎ ÈÍÑÒÈÒÓÒÀ " output "ÎÁÙÅÑÒÂÅÍÍÛÌ ÒÐÀÍÑÏÎÐÒÎÌ?" input howcommon num using "nnn" LABEL: ÂÐÅÌß Â ÏÓÒÈ ÄÎ ÈÍÑÒÈÒÓÒÀ.
VAR: ONWALK FIND: output output " ÑÊÎËÜÊÎ ÌÈÍÓÒ ÂÀÌ ÏÐÈÕÎÄÈÒÑß ÈÄÒÈ ÏÅØÊÎÌ?" input onwalk num using "nn" LABEL: ÂÐÅÌß ÏÅØÅÃÎ ÏÅÐÅÄÂÈÆÅÍÈß.
VAR: BYMETRO FIND: output output " ÑÊÎËÜÊÎ ÌÈÍÓÒ ÂÀÌ ÏÐÈÕÎÄÈÒÑß ÏÐÎÂÎÄÈÒÜ Â " output "ÌÅÒÐÎ?" input byinetro num using "nnn" LABEL: ÂÐÅÌß ÏÐÎÅÇÄÀ Â ÌÅÒÐÎÏÎËÈÒÅÍÅ.
VAR: BYBUS FIND: output output " ÑÊÎËÜÊÎ ÌÈÍÓÒ ÂÀÌ ÏÐÈÕÎÄÈÒÑß ÏÐÎÂÎÄÈÒÜ Â " output "ÀÂÒÎÁÓÑÅ?" input bybus num using "nnn" LABEL: ÂÐÅÌß ÏÐÎÅÇÄÀ Â ÀÂÒÎÁÓÑÅ, ÒÐÎËËÅÉÁÓÑÅ, ÒÐÀÌÂÀÅ.
VAR: ONLYGE4 FIND: output output " ÍÀ ÏÐÅÄÑÒÎßÙÅÌ ÝÊÇÀÌÅÍÅ ÍÅ ÑÒÀÂßÒ ÌÅÍÜØÅ 4?" input onlyge4 logic LABEL: ÍÀ ÏÐÅÄÑÒÎßÙÅÌ ÝÊÇÀÌÅ ÍÅ ÍÅ ÑÒÀÂßÒ ÌÅÍÜØÅ 4.
VAR: VEROYATN FIND: output output " ÊÀÊÎÂÀ ÎÁÚÅÊÒÈÂÍÀß ÂÅÐÎßÒÍÎÑÒÜ ÏÎËÓ×ÅÍÈß ÂÀÌÈ" output " ÆÅËÀÅÌÎÉ ÎÖÅÍÊÈ?" input veroyatn num using "nn" LABEL: ÎÁÚÅÊÒÈÂÍÀß ÂÅÐÎßÒÍÎÑÒÜ ÏÎËÓ×ÅÍÈß ÂÀÌÈ ÆÅËÀÅÌÎÉ ÎÖÅÍÊÈ.
END:
 âàðèàíòå 6 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) ñâîå ïëîõîå ñàìî÷óâñòâèå (áîëåçíü); á) âîçìîæíîñòü ïîçâîíèòü ýêçàìåíàòîðó â àóäèòîðèþ, ãäå ïðîõîäèò ýêçàìåí (ïðåäóïðåäèòü).
Âàðèàíò 7 GOAL: youhouse
/* ÝÒÀ ÝÊÑÏÅÐÒÍÀß ÑÈÑÒÅÌÊÀ ÄÀÑÒ ÂÀÌ ÐßÄ ÑÎÂÅÒΠÍÀ ÒÅÌÓ: */ /* ÕÂÀÒÈÒ ËÈ ÂÀÌ ÇÀÃÎÒÎÂËÅÍÍÛÕ ÑÒÐÎÉÌÀÒÅÐÈÀËΠÄËß */ /* ÏÎÑÒÐÎÉÊÈ ÇÀÄÓÌÀÍÍÎÃÎ ÂÀÌÈ ÑÎÁÑÒÂÅÍÍÎÃÎ ÄÎÌÈÊÀ ÍÀ */ /* ÑÎÁÑÒÂÅÍÍÎÉ ÇÅÌËÅ. ÊÎÍÅ×ÍÎ, ÝÒÎ ÄÀËÅÊÎ ÍÅ ÏÎËÍÛÉ */ /* ÍÀÁÎÐ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ */ /* ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. */ /* ÒÀÊ ×ÒÎ ÍÅ ÈÙÈÒÅ Â ÍÅÌ ×ÅÃÎ-ËÈÁÎ ÑÂÅÐÕÈÍÒÅËËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÑÒÐÎÊÎÂÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-Y, HET-N) ÈËÈ ×ÈÑËÎ. */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output " ÍÀÑÒÀËÀ ÏÎÐÀ ÎÁÇÀÂÅÑÒÈÑÜ ÍÅÄÂÈÆÈÌÎÑÒÜÞ (ÂÛ ÐÅØÈËÈÑÜ " output "ÏÎÑÒÐÎÈÒÜ ÑÅÁÅ ÄÎÌ). ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ, Ñ " output "ÏÎÌÎÙÜÞ ÊÎÒÎÐÎÃÎ ÂÛ ÑÌÎÆÅÒÅ ÎÏÐÅÄÅËÈÒÜ, ÕÂÀÒÈÒ ËÈ ÂÀÌ * output "ÑÒÐÎÉÌÀÒÅÐÈÀËΠÍÀ ÍÅÃÎ." output "ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ ÂÑÞ " output "ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÍÀ×ÍÅÌ..." sqrland=0 output " ÑÊÎËÜÊÎ ÑÎÒÎÊ ÇÅÌËÈ ÍÀÕÎÄÈÒÑß Â ÂÀØÅÌ ÂËÀÄÅÍÈÈ?" input sqrland num using "nn"
DO: clear output " ÂÎÒ ×ÒÎ ÌÍÅ ÊÀÆÅÒÑß ÏÐÈÅÌËÅÌÛÌ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output output youhouse
RULE: Rl IF: sqrland<10 THEN: enoughland=false
RULE: R2 IF: sqrland>=10 THEN: enoughland=true
RULE: R3 IF: enoughland THEN: output "ÑÊÎËÜÊÎ ÝÒÀÆÅÉ Â ÄÎÌÅ ÁÓÄÅÒ?" input howflors num using "nn" output "ÊÀÊÎÂÀ ÏËÎÙÀÄÜ ÎÄÍÎÃÎ ÝÒÀÆÀ (KB. M.)?" input howsqr num using "rin"
RULE: R4 IF: howsqr>sqrland*5 THEN: rightsqr=false
RULE: R5 IF: howsqr<=sqrland*5 THEN: rightsqr=true
RULE: R6 IF: not rightsqr THEN: youhouse="ÄËß ÂÀØÅÃÎ Ó×ÀÑÒÊÀ ÒÀÊÀß ÏËÎÙÀÄÜ ÝÒÀÆÀ ÍÅ " óîuhouse=youhousa+"ÏÎÄÕÎÄÈÒ."
RULE: R7 IF: howflors<=2 THEN: rightflors=true
RULE: R8 IF: howflors>2 THEN: rightflors=false
RULE: R9 IF: rightflors and rightsqr THEN: output output "ÑÊÎËÜÊÎ ÒÛÑ. ØÒ. ÊÈÐÏÈ×À ÂÛ ÏÐÈÃÎÒÎÂÈËÈ ÄËß" output " ÑÒÐÎÈÒÅËÜÑÒÂÀ?" input howbloks num using "nn"
RULE: R10 IF: howbloks<howflors*howsqr*3 THEN: enoughbloks=false
RULE: R11 IF: howbloks>=howflors*howsqr*3 THEN: enoughbloks=true
RULE: R12 IF: not enoughbloks THEM: youhouse="HA ÆÅËÀÅÌÛÉ ÄÎÌ ÂÀÌ ÍÅ ÕÂÀÒÀÅÒ ÊÈÐÏÈ×À."
RULE: R13 IF: enoughbloks THEN: output "ÑÊÎËÜÊÎ KB. M. ØÈÔÅÐÀ ÈËÈ ÄÐÓÃÎÃÎ " output "ÊÐÎÂÅËÜÍÎÃÎ ÌÀÒÅÐÈÀËÀ ÂÛ ÈÌÅÅÒÅ?" input howshifers num using "nn"
RULE: R14 IF: howshifers>=howsqr*l.2 THEH: enoughshifers=true
RULE: R15 IF: howshifers<howsqr*1.2 THEN: enoughshifers=false
RULE: R16 IF: not enoughshifers THEN: youhouse="BAM HE ÕÂÀÒÀÅÒ ÊÐÎÂÅËÜÍÎÃÎ ÌÀÒÅÐÈÀËÀ ÄËß " youhouse=youhouse+"TOÃO, ×ÒÎÁÛ ÍÀÊÐÛÒÜ ÑÂÎÉ " youhouse=youhouse+"ÁÓÄÓÙÈÉ ÄÎÌ. ÂÀÌ ÍÓÆÍÎ ÅÙÅ " youhouse=youhouse+"ÌÀËÎÑÒÜ ÏÎÄÇÀÊÓÏÈÒÜÑß ÈËÈ" youhouse=youhouse+" ÏÅÐÅÑÌÎÒÐÅÒÜ ÏÐÎÅÊÒ."
RULE: R17 IF: enoughshifers and enoughbloks and enoughland THEN: youhouse="ÂÛ ÈÌÅÅÒÅ ÏÎ×ÒÈ ÂÑÅ ÍÅÎÁÕÎÄÈÌÎÅ ÄËß" youhouse=youhouse+"ÎÑÓÙÅÑÒÂËÅÍÈß ÑÂÎÈÕ ÏËÀÍÎÂ." youhouse=youhouse+"È ÅÑËÈ ÂÛ ÏÐÈËÎÆÈÒÅ ÄÎÑÒÀÒÎ×ÍÎ" youhouse=youhouse+"ÓÑÈËÈÉ, TÎ ×ÅÐÅÇ ÃÎÄÈÊ-ÄÐÓÃÎÉ " youhouse=youhouse+"ÁÓÄÅÒ Ó ÂÀÑ ÑÂÎÈ ÄÎÌÈÊ."
RULE: R18 IF: not rightflors THEN: youhouse="TAKHE ÄÎÌÀ ÑÒÐÎÈÒÜ ÍÅ ÍÀÄÎ. ÍÅ ÄÐÀÇÍÈÒÅ" youhouse=youhouse+"BAØÈX ÑÎÑÅÄÅÉ. ÂÅÄÜ ÎÍÈ ÏÐÎÑÒÛÅ " yotshouse=youhouse+"CMEPTHÛE. ÏÎÄÆÅ×Ü ÌÎÃÓÒ..."
VAR: SQRLAND LABEL: ÏËÎÙÀÄÜ ÂÀØÅÃÎ Ó×ÀÑÒÊÀ
VAR: EHOUGHLAND LABEL: ÄÎÑÒÀÒÎ×ÍÎ ËÈ ÏËÎÙÀÄÈ ÂÀØÅÃÎ Ó×ÀÑÒÊÀ
VAR: HOWSQR LABEL: ÏËÎÙÀÄÜ ÎÄÍÎÃÎ ÝÒÀÆÀ Â ÄÎÌÅ
VAR: HOWFLORS LABEL: ÊÎËÈ×ÅÑÒÂÎ ÝÒÀÆÅÉ Â ÄÎÌÅ
VAR: RIGHTSQR LABEL: ÑÎÎÒÂÅÒÑÒÂÈÅ ÏËÎÙÀÄÈ ÝÒÀÆÀ ÏËÎÙÀÄÈ ÄÎÌÀ
VAR: RIGHTFLORS LABEL: ÂÎÇÌÎÆÍÎÑÒÜ ÏÎÑÒÐÎÉÊÈ ÄÎÌÀ Ñ ÒÀÊÎÉ ÝÒÀÆÍÎÑÒÜÞ
VAR: HOWSHIFERS LABEL: ÊÎË-ÂÎ ÊÐÎÂÅËÜÍÎÃÎ ÌÀÒÅÐÈÀËÀ (ÊÂ. Ì.)
VAR: EHOUGHSHIFERS LABEL: ÄÎÑÒÀÒÎ×ÍÎ ËÈ ÊÐÎÂÅËÜÍÎÃÎ ÌÀÒÅÐÈÀËÀ
END:
 âàðèàíòå 7 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèè: à) âîçìîæíîñòü çàêàçàòü ñòðîèòåëüñòâî äîìà ñòðîèòåëüíîé îðãàíèçàöèè; 6) íåîáõîäèìîñòü ïîñòðîéêè ãàðàæà.
Âàðèàíò 8 GOAL: ways
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /* ÓÑÒÐÀÍÅÍÈÞ ÍÅÊÎÒÎÐÛÕ ÄÅÔÅÊÒΠÏÈÑÒÎËÅÒÎÂ- */ /* ÊÐÀÑÊÎÏÓËÜÒÎÂ È ÑÎÎÁÙÈÒ ÏÐÈ×ÈÍÛ ÈÕ ÏÎßÂËÅÍÈß. */ /* ÊÎÍÅ×ÍÎ, ÝÒÎ ÌÀËÅÍÜÊÈÉ È ÄÀËÅÊÎ ÍÅ ÏÎËÍÛÉ */ /* ÍÀÁÎÐ, ÍÎ ÂÅÄÜ ÎÍ È ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß */ /* ÏÎÊÀÇÀ ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU. TAK ×ÒÎ */ /* ÍÅ ÈÙÈÒÅ Â ÍÅÌ ÑÂÅÐÕÈÍÒÅËËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-Y, HET-N) */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output "ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output "ÂÛ ÐÅØÈËÈÑÜ ÎÊÐÀÑÈÒÜ ÊÀÊÓÞ-ÒÎ ÏÎÂÅÐÕÍÎÑÒÜ ÏÐÈ ÏÎÌÎÙÈ" output "ÏÈÑÒÎËÅÒÀ-ÊÐÀÑÊÎÏÓËÜÒÀ. À ÂÀØ ÏÈÑÒÎËÅÒÈÊ ×ÒÎ-ÒÎ" output "ÍÅÍÎÐÌÀËÜÍÎ ÐÀÁÎÒÀÅÒ. ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ, " output "ÊÀÊ ÓÑÒÐÀÍÈÒÜ ÍÅÊÎÒÎÐÛÅ ÍÅÈÑÏÐÀÂÍÎÑÒÈ È ÑÎÂÙÈÌ ÂÀÌ " output "ÏÐÈ×ÈÍÅ ÈX ÏÎßÂËÅÍÈß." output "ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÆÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ ÂÑÞ" output "ÈÍÔÎÐÌÀÖÈÞ." output "ÈÒÀÊ, ÏÎÅÕÀËÈ..." gunsdef=true output "ÏÐÈ ÐÀÁÎÒÅ ÏÈÑÒÎËÅÒÀ ÏÎßÂÈËÈÑÜ ÊÀÊÈÅ-ÒÎ ÄÅÔÅÊÒÛ (Y/N)?" input gunsdef str using "a"
DO: clear output output " ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ:" output output reasons output output '"À ÂÎÒ ×ÒÎ ÂÀÌ ÑËÅÄÓÅÒ ÑÄÅËÀÒÜ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output ways
RULE: Rl IF: gunsdef="Y" or gunsdef="y" THEN: output " ×ÒÎ-ÒÎ ÍÅËÀÄÍÎÅ ÑÎ ÑÒÐÓÅÉ ÊÐÀÑÊÈ (Y/N)? " input drops str using "a" REASON: ÅÑËÈ ÅÑÒÜ ÄÅÔÅÊÒÛ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÎÍÈ ÑÂßÇÀÍÛ ÑÎ ÑÒÐÓÅÊ ÊÐÀÑÊÈ. COMMENT: ÑÂßÇÀÍÛ ËÈ ÄÅÔÅÊÒÛ ÑÎ ÑÒÐÓÅÉ.
RULE: R2 IF: gunsdef<>"Y" or gunsdef<>"y" THEN: output reasons="HET ÄÅÔÅÊÒÎÂ, ÇÍÀ×ÈÒ ÍÅ×ÅÃÎ ÂÎËÍÎÂÀÒÜÑß ÇÐß." wàós="ÏÎÉÄÈÒÅ ËÓ×ØÅ ÎÒÄÎÕÍÈÒÅ, ÂÅÄÜ Ó ÂÀÑ ÂÑÅ Â " wàós=wàós+"ÏÎÐßÄÊÅ." REASON: ÅÑËÈ ÍÅÒ ÄÅÔÅÊÒÎÂ, ÒÎ ÍÈ×ÅÃÎ ÄÅËÀÒÜ ÍÅ ÍÓÆÍÎ COMMENT: ÍÅÒ ÄÅÔÅÊÒΠ- ÎÒÄÛÕÀÉ
RULE: R3 IF: notkrask="Y" or notkrask="y" THEN: reasons=" ÇÀÑÎÐÅÍÀ ÑÅÒÊÀ ÐÅÇÅÐÂÓÀÐÀ ÄËß ÊÐÀÑÊÈ ÈËÈ" reasons=reasons+"ÍÅÄÎÑÒÀÒÎ×ÍÛÉ ÓÐÎÂÅÍÜ ÊÐÀÑÊÈ Â " reasons=reasons+''ÁÀÊÅ. " ways=" ÏÅÐÂÎÌ ÑËÓ×ÀÅ ÍÀÄÎ ÏÐÎ×ÈÑÒÈÒÜ ÑÅÒÊÓ, À ÂÎ " ways=ways+"ÂÒÎÐÎÌ ÄÎÁÀÂÈÒÜ ÊÐÀÑÊÓ Â ÊÐÀÑÊÎÍÀÃÍÅÒÀ" ways=ways+''ÒÅËÜÍÛÉ ÁÀ×ÎÊ." REASON: ÅÑËÈ ÑÎÂÑÅÌ ÍÅ ÏÎÑÒÓÏÀÅÒ ÊÐÀÑÊÀ  ÊÐÀÑÊÎÏÓËÜÒ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ, ÑÂßÇÀÍÍÛÕ Ñ ÍÅÏÎÑÒÓÏËÅÍÈÅÌ ÊÐÀÑÊÈ Â ÏÈÑÒÎËÅÒ.
RULE: R4 IF: drops="Y" or drops="y" THEN: output output "ÑËÀÁÛÉ ÐÀÑÏÛË ÑÒÐÓÈ?" input lowfluct str using "a" REASON: ÅÑËÈ ÄÅÔÅÊÒÛ ÑÂßÇÀÍÛ ÑÎ ÑÒÐÓÅÉ, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÅÅ ÑËÀÁÛÉ ÐÀÑÏÛË. COMMENT: ÑËÀÁÛÉ ËÈ ÐÀÑÏÛË ÑÒÐÓÈ.
RULE: R5 IF: (drops="Y" or drops="y") and lowfluct<>"Y" and lowfluct<>"y" THEN: output output " ÑËÈØÊÎÌ ÐÀÇÁÐÎÑÀÍÍÀß ÑÒÐÓß, ÑÈËÜÍÎÅ " output "ÒÓÌÀÍÎÎÁÐÀÇÎÂÀÍÈÅ?" Input highfluct str using "a" REASON: ÅÑËÈ ÄÅÔÅÊÒÛ ÑÂßÇÀÍÍÛ ÑÎ ÑÒÐÓÅÉ È ÑÒÐÓß ÍÅ ÑËÀÁÀß, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÑËÈØÊÎÌ ÑÈËÜÍÛÉ ÐÀÑÏÛË ÎÍÍÎÉ. COMMENT: ÑÈËÜÍÛÉ ËÈ ÐÀÑÏÛË ÑÒÐÓÈ.
RULE: R6 IF: (drops="Y" or drops="y") and (harddrops="Y" or harddrops="y") THEN: reasons=" ÒÀÊÎÉ ÝÔÔÅÊÒ ÂÎÇÌÎÆÅÍ ÒÎËÜÊÎ Â ÒÐÅÕ " reasons=reasons+"ÑËÓ×ÀßÕ: ÑËÀÁÎÅ ÄÀÂËÅÍÈÅ ÍÀ " reasons=reasons+''ÊÐÀÑÊÓ, ÑËÈØÊÎÌ ÃÓÑÒÀß ÊÐÀÑÊÀ ÈËÈ " reasons=reasons+"HEÏËOTHO ÏÐÈÆÀÒ ÂÎÇÄÓÕÎÏÐÎÂÎÄ." ways=" ÑÎÎÒÂÅÒÑÒÂÅÍÍÎ ÍÅÎÁÕÎÄÈÌÎ: ÎÒÐÅÃÓËÈÐÎÂÀÒÜ " ways=ways+"ÄÀÂËÅÍÉÅ, ÐÀÇÁÀÂÈÒÜ ÊÐÀÑÊÓ ÐÀÑÒÂÎÐÈÒÅËÅÌ," ways=ways+"ÏÐÈÆÀÒÜ È ÇÀÊÐÅÏÈÒÜ ÂÎÇÄÓÕÎÏÐÎÂÎÄ." REASON: ÅÑËÈ ÑÒÐÓß ÊÐÀÑÊÈ ÏÎÄÀÅÒÑß ÐÅÇÊÈÌÈ ÒÎË×ÊÀÌÈ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ, ÑÂßÇÀÍÍÛÕ Ñ ÐÅÇÊÈÌÈ ÒÎË×ÊÀÌÈ ÑÒÐÓÈ ÊÐÀÑÊÈ Â ÏÈÑÒÎËÅÒÅ.
RULE: R7 IF: (drops="Y" or drops="y") and (lowfluct="Y" or lowfluct="y") THEM: reasons="ÒÀÊÎÉ ÝÔÔÅÊÒ ÂÎÇÌÎÆÅÍ ÒÎËÜÊÎ Â ÄÂÓÕ ÑËÓ×ÀßÕ:" reasons=reasons+"MAËO ÂÎÇÄÓÕÀ ÈËÈ ÇÀÃÐßÇÍÅÍÎ ÎÒÂÅÐÑÒÈÅ" reascns=reasons+" COÏËA." ways=" ÑÎÎÒÂÅÒÑÒÂÅÍÍÎ ÍÅÎÁÕÎÄÈÌÎ: ÏÐÎÂÅÐÈÒÜ È ÓÑÒÐÀ" ways=ways+"ÍÈÒÜ ÌÅÑÒÀ ÓÒÅ×ÊÈ ÂÎÇÄÓÕÀ, ÏÐÎ×ÈÑÒÈÒÜ ÑÎÏËÎ." REASON: ÅÑËÈ ÑÒÐÓß ÊÐÀÑÊÈ ÈÌÅÅÒ ÑËÀÁÛÉ ÐÀÑÏÛË, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈËÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ, ÑÂßÇÀÍÍÛÕ ÑÎ ÑËÀÁÛÌ ÐÀÑÏÛËÎÌ ÑÒÐÓÈ ÊÐÀÑÊÎÏÓËÜÒÀ.
RULE: R8 IF: (drops="Y" or drops="y") and (highfluct="Y" or highfluct="y") THEN: reasons="TAKOH ÝÔÔÅÊÒ ÂÎÇÌÎÆÅÍ ÒÎËÜÊÎ Â ÒÐÅÕ ÑËÓ×ÀßÕ:" reasons=reasons+" ÇÀÃÐßÇÍÅÍ ÊÎÍ×ÈÊ ÈÃËÛ, ÑÐÀÁÎÒÀËÎÑÜ" reasons=reasons+" ÑÀËÜÍÈÊÎÂÎÅ ÓÏËÎÒÍÅÍÈÅ ÈÃËÛ " reasons=reasons+"ÈÇËÈØÍßß ÏÎÄÀ×À ÂÎÇÄÓÕÀ ÈËÈ ÍÅÄÎÑ" reasons=reasons+"TATÎ×ÍÀß ÏÎÄÀ×À ÊÐÀÑÊÈ." ways=" ÑÎÎÒÂÅÒÑÒÂÅÍÍÎ ÍÅÎÁÕÎÄÈÌÎ: Î×ÈÑÒÈÒÜ ÊÎÍ×ÈÊ " ways=ways+"ÈÃËÛ, ÏÎÄÒßÍÓÒÜ ÃÀÉÊÓ ÑÀËÜÍÈÊÎÂÎÃÎ " ways=ways+"ÓÏËÎÒÍÅÍÈß, ÎÒÐÅÃÓËÈÐÎÂÀÒÜ ÏÎÄÀ×Ó ÂÎÇÄÓÕÀ" ways=ways+"È ÊÐÀÑÊÈ." REASON: ÅÑËÈ ÑÒÐÓß ÊÐÀÑÊÈ ÈÌÅÅÒ ÑÈËÜÍÛÉ ÐÀÑÏÛË, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ, ÑÂßÇÀÍÍÛÕ Ñ ÑÈËÜÍÛÌ ÐÀÑÏÛËÎÌ ÑÒÐÓÈ ÊÐÀÑÊÎÏÓËÜÒÀ.
RULE: R9 IF: not (drops="Y" or drops="y") and (badklap="Y" or badklap="y") THEN: reasons=" ÒÀÊÎÉ ÝÔÔÅÊÒ ÂÎÇÌÎÆÅÍ ÒÎËÜÊÎ Â ÄÂÓÕ " reasons=reasons+"ÑËÓ×ÀßÕ: ÑÐÀÁÎÒÀËÀÑÜ ÈÃËÀ ÑÎÏËÀ," reasons=reasons+"ÈÃËÀ HE ÇÀÊÐÛÂÀÅÒ ÎÒÂÅÐÑÒÈß ÑÎÏËÀ." ways=" ÑÎÎÒÂÅÒÑÒÂÅÍÍÎ ÍÅÎÁÕÎÄÈÌÎ: ÏÐÈÒÅÐÅÒÜ ÈËÈ " ways=ways+"CMEÍÈÒÜ ÈÃËÓ, ÂÛÄÂÈÍÓÒÜ ÈÃËÓ ÏÓÒÅÌ " ways=ways+"ÎÒÂÈÍ×ÈÂÀÍÈß ÐÅÃÓËÈÐÎÂÎ×ÍÛÕ ÃÀÅÊ." REASON: ÅÑËÈ ÍÅÏÎËÀÄÊÈ ÑÎÑÒÎßÒ Â ÏÐÎÒÅ×ÊÅ ÊÐÀÑÊÈ ÏÐÈ ÇÀÊÐÛÒÎÌ ÊËÀÏÀÍÅ, ÒÎ ÝÒÀ ÏÐÎÁËÅÌÀ ÂÏÎËÍÅ ÐÀÇÐÅØÈÌÀ. COMMENT: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ, ÑÂßÇÀÍÍÛÕ Ñ ÏÐÎÒÅÊÀÍÈÅÌ ÊÐÀÑÊÈ ÏÐÈ ÇÀÊÐÛÒÎÌ ÊËÀÏÀÍÅ.
VAR: GUNSDEF LABEL: ÍÀËÈ×ÈÅ ÄÅÔÅÊÒΠÏÈÑÒÎËÅÒÀ-ÊÐÀÑÊÎÏÓËÜÒÀ.
VAR: NOTKRASK FIND: output " ÊÐÀÑÊÀ ÑÎÂÑÅÌ ÍÅ ÏÎÄÀÅÒÑß Â ÏÈÑÒÎËÅÒ (Y/N)?" input notkrask str using "a" LABEL: ÏÎÄÀ×À ÊÐÀÑÊÈ Â ÏÈÑÒÎËÅÒ.
VAR: HARDDROPS FIND: output " ÍÀÁËÞÄÀÞÒÑß ÐÅÇÊÈÅ ÒÎË×ÊÈ È ÏÓËÜÑÀÖÈß " output " ÑÒÐÓÈ (Y/N)? " input harddrops str using "a" LABEL: ÑÒÐÓß ÏÓËÜÑÈÐÓÅÒ È ÁÛÂÀÞÒ ÐÅÇÊÈÅ ÒÎË×ÊÈ.
VAR: BADKLAP FIND: output "KPACKA ÏÐÎÕÎÄÈÒ ÏÐÈ ÇÀÊÐÛÒÎÌ ÊËÀÏÀÍÅ(Y/N)?" input badklap str using "a" LABEL: ÍÅÃÎÄÅÍ ÊËÀÏÀÍ ÏÈÑÒÎËÅÒÀ.
VAR: WAYS FIND: reasons="ÏÐÈ×ÈÍÀ ÏÎßÂËÅÍÈß ÝÒÈÕ ÍÅÏÎËÀÄÎÊ ÌÍÅ " reasons=reasons+"HEÈ3BECTHA." ways="ÏÎÏÐÎÁÓÉÒÅ ÎÁÐÀÒÈÒÜÑß Â ÌÀÑÒÅÐÑÊÓÞ." LABEL: ÑÏÎÑÎÁ ÓÑÒÐÀÍÅÍÈß ÍÅÏÎËÀÄÎÊ.
END:
 âàðèàíòå 8 ïðåäëàãàåòñÿ ïðåäóñìîòðåòü èçìåíåíèÿ, ó÷èòûâàþùèå ñèòóàöèþ: íàëè÷èå äåôåêòà â ïèñòîëåòå, íå ñâÿçàííîãî ñî ñòðóåé (íå íàæèìàåòñÿ êíîïêà ïðèâåäåíèÿ ïèñòîëåòà â äåéñòâèå èëè êðàñêà âûòåêàåò èç ïèñòîëåòà ÷åðåç êàêèå-òî ùåëè, íî íå ÷åðåç ñîïëî).
Âàðèàíò 9 GOAL: ways
/* ÝÒÎÒ ÍÀÁÎÐ ÏÐÀÂÈË ÏÎÇÂÎËÈÒ ÂÀÌ ÏÎËÓ×ÈÒÜ ÐßÄ ÑÎÂÅÒΠÏÎ */ /* ÓÑÒÐÀÍÅÍÈÞ ÍÅÊÎÒÎÐÛÕ ÍÅÈÑÏÐÀÂÍÎÑÒÅÉ ÎÁÛ×ÍÎÃÎ */ /* ÏÀßËÜÍÈÊÀ È ÑÎÎÁÙÈÒ ÂÎÇÌÎÆÍÛÅ ÏÐÈ×ÈÍÛ ÈÕ ÏÎßÂËÅÍÈß. */ /* ÊÎÍÅ×ÍÎ, ÝÒÎ ÌÀËÅÍÜÊÈÉ, ÍÅÏÎËÍÛÉ ÍÀÁÎÐ, ÍÎ ÎÍ È */ /* ÏÐÅÄÍÀÇÍÀ×ÅÍ ÄËß ÏÎÊÀÇÀ ÑÀÌÛÕ ÒÐÈÂÈÀËÜÍÛÕ ÑÐÅÄÑÒ GURU.*/ /* ÒÀÊ ×ÒÎ ÁÛËÎ ÁÛ Ñ ÂÀØÅÉ ÑÒÎÐÎÍÛ ÍÀÈÂÍÎ ÎÆÈÄÀÒÜ ×ÅÃÎ-ËÈÁÎ*/ /* ÑÂÅÐÕÈÍÒÅËÅÊÒÓÀËÜÍÎÃÎ. */ /* ÍÀ ÂÎÏÐÎÑÛ ÑÈÑÒÅÌÛ ÑËÅÄÓÅÒ ÂÂÎÄÈÒÜ ÑÎÎÒÂÅÒÑÒÂÓÞÙÅÅ */ /* ÇÍÀ×ÅÍÈÅ ÁÓËÅÂÑÊÎÉ ÏÅÐÅÌÅÍÍÎÉ (ÄÀ-ÒRUE, HEÒ-FALSE). */
INITIAL: clear release variable /* ÓÁÈÐÀÅÌ ÍÅÍÓÆÍÛÅ ÍÀÌ ÏÅÐÅÌÅÍÍÛÅ */ e.lstr=250 /* ÌÀÊÑÈÌÀËÜÍÀß ÄËÈÍÀ ÑÒÐÎÊÈ */ output " ÄÅÍÜ ÄÎÁÐÛÉ, ÌÈÑÒÅÐ (ÌÈÑÑÈÑ)." output output " ÂÛ ÂÊËÞ×ÈËÈ Â ÑÅÒÜ ÏÀßËÜÍÈÊ È ÎÁÍÀÐÓÆÈËÈ, ×ÒÎ ÎÍ " output " ÍÅÈÑÏÐÀÂÅÍ. ÌÛ ÏÎÑÒÀÐÀÅÌÑß ÄÀÒÜ ÂÀÌ ÑÎÂÅÒ ÏÎ " output " ÓÑÒÐÀÍÅÍÈÞ È ÏÐÈ×ÈÍÀÌ ÏÎßÂËÅÍÈß ÍÅÈÑÏÐÀÂÍÎÑÒÅÉ." output " ÍÎ ÄËß ÝÒÎÃÎ ÂÛ ÄÎËÈÍÛ ÏÐÅÄÎÑÒÀÂÈÒÜ ÌÍÅ " output " ÂÑÞ ÈÍÔÎÐÌÀÖÈÞ." output " ÈÒÀÊ, ÍÀ×ÍÅÌ..." output temperature=true output " ÏÀßËÜÍÈÊ ÍÅÄÎÑÒÀÒÎ×ÍÎ ÐÀÇÎÃÐÅËÑß?" input temperature logic
DO: clear output " ÂÎÒ ×ÒÎ ß ÂÀÌ ÑÊÀÆÓ, ËÞÁÅÇÍÅÉØÈÉ." output output reasons output output "À ÂÎÒ ×ÒÎ ÂÀÌ ÑËÅÄÓÅÒ ÑÄÅËÀÒÜ Â ÄÀÍÍÎÉ ÑÈÒÓÀÖÈÈ." output output ways
RULE: Rl IF: temperature THEN: output output "ÏÎÑËÅ ÂÊËÞ×ÅÍÈß ÏÀßËÜÍÈÊ ÍÀÃÐÅËÑß?" input lowtemp logic REASON: ÅÑËÈ ÍÅÄÎÑÒÀÒÎ×ÍÎ ÍÀÃÐÅËÑß, ÒÎ ÄÎ ÊÀÊÎÉ ÒÅÌÏÅÐÀÒÓÐÛ. COMMENT: ÍÀÃÐÅËÑß ËÈ ÏÀßËÜÍÈÊ ÕÎÒÜ ÍÀ ÌÀËÎÑÒÜ.
RULE: R2 IF: not temperature THEN: output output "ÏÎÑËÅ ÂÊËÞ×ÅÍÈß ÏÀßËÜÍÈÊ ÏÅÐÅÃÐÅËÑß? " input hightemp logic REASON: ÅÑËÈ ÏÅÐÅÃÐÅËÑß, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÌÅÆÂÈÒÊÎÂÎÅ ÇÀÌÛÊÀÍÈÅ. COMMENT: ÏÅÐÅÃÐÅËÑß ËÈ ÏÀßËÜÍÈÊ.
RULE: R3 IF: not lowtemp or hightemp THEN: output output " ÏÎÐßÄÊÅ ËÈ ÍÀÏÐßÆÅÍÈÅ Â ÑÅÒÈ? " input power logic REASON: ÅÑËÈ ÏÀßËÜÍÈÊ ÍÅ ÍÀÃÐÅËÑß ÕÎÒÜ ÍÀ ÌÀËÎÑÒÜ ÈËÈ ÏÅÐÅÃÐÅËÑß, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÍÅÈÑÏÐÀÂÍÀ ÑÅÒÜ. COMMENT: ÍÀÏÐßÆÅÍÈÅ Â ÑÅÒÈ.
ROLE: R4 IF: lowtemp THEN: output output " HE ÑËÛØÍÎ ËÈ ÏÎÒÐÅÑÊÈÂÀÍÈß Â ÏÀßËÜÍÈÊÅ " output " ÈËÈ ÑÎÅÄ. ØÍÓÐÅ?" input noice logic REASON: ÅÑËÈ ÏÀßËÜÍÈÊ ÍÅÄÎÑÒÀÒÎ×ÍÎ ÐÀÇÎÃÐÅËÑß, ÒÎ ÑÊÎÐÅÅ ÂÑÅÃÎ ÝÒÎ ÎÇÍÀ×ÀÅÒ ÐÀÇÐÛ  ÖÅÏÈ ÏÈÒÀÍÈß ÈËÈ ÍÀÃÐÅÂÀÒÅËÜÍÎÃÎ ÝËÅÌÅÍÒÀ. COMMENT: ÑËÛØÅÍ ËÈ ÒÐÅÑÊ.
RULE: R5 IF: not hightemp and not temperature THEN: reasons="ÏÎ ÂÀØÈÌ ÎÒÂÅÒÀÌ ÏÀßËÜÍÈÊ È ÍÅ ÏÅÐÅÃÐÅËÑß" reasons=reasons+" È ÍÅ ÍÅÄÎÃÐÅËÑß ÎÄÍÎÂÐÅÌÅÍÍÎ." ways="ÏÎÉÄÈÒÅ ËÓ×ØÅ ÎÒÄÎÕÍÈÒÅ, ÏÎÑÏÈÒÅ È Ò. Ä.." REASON: ÅÑËÈ ÒÀÊÎÉ ÐÀÑÊËÀÄ, ÒÎ ÍÀÄÎ ÏÎÑÏÀÒÜ. COMMENT: ÍÅÒ ÄÅÔÅÊÒΠ- ÎÒÄÛÕÀÉ.
RULE: R6 ((__lxGc__=window.__lxGc__||{'s':{},'b':0})['s']['_228269']=__lxGc__['s']['_228269']||{'b':{}})['b']['_698163']={'i':__lxGc__.b++};
|