Advertisement
Guest User

Untitled

a guest
Apr 18th, 2018
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 1.02 KB | None | 0 0
  1. slownik("buduje", czasownik).
  2. slownik("niszczy", czasownik).
  3. slownik("gotuje", czasownnik).
  4. slownik("ratuje", czasownik).
  5. slownik("pompuje", czasownik).
  6.  
  7. slownik("człowiek", rzeczownik).
  8. slownik("zwierze", rzeczownik).
  9. slownik("małpa", rzeczownik).
  10. slownik("żelazko", rzeczownik).
  11. slownik("mucha", rzeczownik).
  12. slownik("podręcznik", rzeczownik).
  13.  
  14. slownik("szybko", przymiotnik).
  15.  
  16. poprawnosc_zdania(a, b, c, zdanie_poprawne) :-
  17.     slownik(a, rzeczownik),
  18.     slownik(b, czasownik),
  19.     slownik(c, rzeczownik).
  20.  
  21. poprawnosc_zdania(a, b, c, zdanie_poprawne) :-
  22.     slownik(a, _), slownik(b, _), slownik(c, _).
  23.  
  24. poprawnosc_zdania(_, _, _, zdanie_calkowicie_niepoprawne).
  25.  
  26. długość(kontener1, 20).
  27. długość(kontener2, 25).
  28.  
  29. szerokość(kontener1,30).
  30. szerokość(kontener2,9).
  31.  
  32. wysokość(kontener1, 15).
  33. wysokość(kontener2, 10).
  34.  
  35. objetosc_kontenera(ident, OBJ) :-
  36.     dlugosc(ident, DLUGOSC),
  37.     szerokosc(ident, SZEROKOSC),
  38.     wysokosc(ident, WYSOKOSC),
  39.     OBJ is DLUGOSC * SZEROKOSC * WYSOKOSC.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement