Responsi Praktikum Kecerdasan Buatan

DISUSUN OLEH

Nim    : 115410138

Nama   : Hermawan

1.  SCRIPT PROGRAM :

DOMAINS

 orang = string

PREDICATES

 nondeterm anak(orang,orang)

 nondeterm saudara_laki(orang,orang)

 nondeterm saudara_perempuan(orang,orang)

 nondeterm menikah(orang,orang)

 nondeterm ayah(orang,orang)

 nondeterm ibu(orang,orang)

 nondeterm kakek(orang,orang)

CLAUSES

 anak("Cahaya","Doni").

 anak("Doni","Fajar").

 saudara_laki("Adi","Fajar").

 saudara_perempuan("Lina","Budi").

 menikah("Fajar","Ani").

 menikah("Doni","Lina").

 ayah(A,B):-anak(B,A).

ibu(A,B):-anak(B,C),menikah(C,A).

 kakek(A,B):-anak(B,C),anak(C,A).

GOAL

 ayah(X,Y).

ü  HASIL OUTPUT :

2.  SCRIPT PROGRAM :

DOMAINS

 no_ka = integer

 nama_ka, tujuan, waktu = string

FACTS

 kereta (no_ka, nama_ka, tujuan, waktu)

PREDICATES

 nondeterm tampil

CLAUSES

 kereta (217,"Prameks","Yogya","18:42").

 tampil:-kereta (No_ka, Nama_ka, Tujuan, Waktu),

    write (No_ka,"\t", Nama_ka,"\t\t", Tujuan,"\t\t", Waktu),nl,

    fail.

 tampil.

 GOAL

 save("E:\daftar_kereta.txt"),

    tampil.

ü  HASIL OUTPUT :

   

      a.  File program notepad (berfotmat.txt) berada di disk E:, dengan nama file nya adalah daftar_kereta.txt

     b.  Menambah Program

    

    

   

    c. HASIL OUTPUT :

3.       Perbedaan assert, asserta dan assertz adalah asserta menyertakan sebuah fakta baru pada section facts sebelum fakta-fakta yang telah ada untuk predikat tersebut, sedangkan assertz menyertakan sebuah fakta baru setelahnya, sedangkan assert berfungsi sama seperti assertz.