Kembali berjumpa di soal yang ketiga, seperti apa ya soal ketiga ini…jadi penasaran…he5…..
Tugas ketiga adalah :
Menentukan profesi dari klausa yang diberikan dengan syarat usia di atas 40 tahun. Klausanya sendiri adalah sebagai berikut :
person(john,smith,45,london,doctor).
person(martin,williams,33,birmingham,teacher).
person(henry,smith,26,manchester,plumber).
person(jane,wilson,62,london,teacher).
person(mary,smith,29,glasgow,surveyor).
Terus…terus…terus….bagaimana coodingnya? Begini rumusnya :
profesi:-person(_,_,Usia,_,Prof),Usia>40,write(‘Profesi untuk usia di atas 40 tahun adalah ‘),write(Prof),nl,fail.
profesi.
person(john,smith,45,london,doctor).
person(martin,williams,33,birmingham,teacher).
person(henry,smith,26,manchester,plumber).
person(jane,wilson,62,london,teacher).
person(mary,smith,29,glasgow,surveyor).
Penjelasannya adalah sebagai berikut :
Kita membagi dalam dua bagian utama yaitu pemroses dan klausa. Pemroses menyatakan untuk mencari profesi dari klausa person dimana data yang di ambil adalah usia dan profesi dengan batasan umur di atas 40 tahun. Mengerti kan maksudnya? Semoga mengerti….. he5 Untuk lebih jelasnya langsung kita coba saja.
Kita buat dulu aturan dan klausa tersebut dalam notepad dengan format penyimpanan namafile.pl seperti pada gambar di bawah ini :
Kemudian kita masukkan ke prolog melalui consult :
Kemudian kita coba jalankan dalam prolog dengan kata kunci :
profesi.
Jika berhasil maka hasilnya adalah seperti gambar di bawah ini :
Alhamdulilah….berhasil…… kalau begitu sampai di sini dulu ya sob, jumpa lagi di lain waktu dan kesempatan ya. Selamat belajar…..!!!!!!!!!!
