SHARE
TWEET

Untitled

a guest Oct 15th, 2019 77 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. knowledge base nazwa
  2. facets
  3.       diagnoza;
  4.       objaw1;
  5.       objaw2;
  6.       objaw3;
  7.       objaw4;
  8.       temp_ciała;
  9. end;
  10. rules
  11.      diagnoza="grypa"if
  12.      objaw1="katar",
  13.      objaw2="wysoka temperatura",
  14.      objaw3="osłabienie",
  15.      objaw4="ból mieśni i stawów";
  16.      objaw2 = "wysoka temperatura"if
  17.      temp_ciała =X,X>38;
  18. end;
  19. control
  20.        float X;
  21.        neditBox(0,0,35,41, "Podaj temperaturę", X);
  22.        menu "Diagnostyka"
  23.        1."Analiza SE"
  24.        2."Wyjście"
  25.        case 1:
  26.        vignette("GRYPA", "Zajęcia 2","Mielczarek Filip");
  27.        run;
  28.        goal("diagnoza = X");
  29.        delNewFacts;
  30.        case 2: exit;
  31.        end;
  32. end;
  33. end;
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top