:
  |    

 /

1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9

Postavka:

1. (KACH);

2. (DOST);

3. (SENA);

4. (ASSOR);

5. (SKID).

Expert Build Tanya Peiinition Goal Postavka Initialization

Input_kach_int_with_Kakoe kachestvo produksii?(1-visokoe,2-srednee,3-nizkoe):

Input_dost_str_with_Est li dostavka?(y/n):

Input_sena_int_with_Kakay sena na produksiiu?(1-visokaya,2-srednaia,3-nizkaya):

Input_assor_str_with_Est li assortiment produksii?(y/n):

Input_kach_str_with_Est li skidki ?(y/n):

e.rigr=a

prof={wiz_cf_0,ros_cf_0, dil_cf_0, aesp_cf_0, arm_cf_0, lan_cf_0, son_cf_0}

Rules Create k1 ()

K1

IF: kach=1

THEN: postavka+={wiz_cf_30,arm_cf_15}

K2

IF: kach=2

THEN: postavka+={ros_cf_30}

K3

IF: kach=3

THEN: postavka+={aesp_cf_30,dil_cf_50,lan_cf_40,son_cf_60}

Create

D

IF: dost=y

THEN: postavka+=wiz_cf_60

Create

S1

IF: sena=1

THEN: postavka+={aesp_cf_80,dil_cf_30,arm_cf_50}

S2

IF: sena=2

THEN: postavka+={arm_cf_20,dil_cf_5}

Postavka-=aesp_cf_45

S3

IF: sena=3

THEN: postavka-={ros_cf_5,arm_cf_60,dil_cf_30}

A

IF: assor=y

THEN: postavka+=Wiz_cf_70

S

IF: skid=y

THEN: postavka+={son_cf_20,Lan_cf_30,wiz_cf_50}

Completion: ?_vozmojni sled varianti:

?_wiz-,cfv(postavka,wiz)

?_ros-,cfv(postavka,ros)

?_dil-,cfv(postavka,dil)

?_aesp-,cfv(postavka,arm)

?_lan-,cfv(postavka,lan)

?_son-,cfv(postavka,son)

?_nailuchshii wariant-, postavka

Exit - compile




Copyright © 2005—2007 «Mark5»