Expert System

1. tulis di Notepad

person(riza,hanum,010,surabaya,18).
person(widya,kandora,090,bandung,17).
person(ryan,adelia,096,sidoarjo,16).
person(yanis,widhiastari,002,denpasar,17).
person(nurul,fakhria,097,sidoarjo,16).
person(indah,sari,087,banyuwangi,18).
man(A):-person(A,B,c,D,18).

2. tulis di prolog
?-person(NamaAwal,NamaAkhir,NRP,KotaAsal,Usia).

3. outputnya
NamaAwal = riza
NamaAkhir = hanum
NRP = 10
KotaAsal = surabaya
Usia = 18;

NamaAwal = widya
NamaAkhir = kandora
NRP = 90
KotaAsal = bandung
Usia = 17;

NamaAwal = ryan
NamaAkhir = adelia
NRP = 96
KotaAsal = sidoarjo
Usia = 16;

NamaAwal = yanis
NamaAkhir = widhiastari
NRP = 02
KotaAsal = denpasar
Usia = 17;

NamaAwal = nurul
NamaAkhir = fakhria
NRP = 97
KotaAsal = sidoarjo
Usia = 16;

NamaAwal = indah
NamaAkhir = sari
NRP = 87
KotaAsal = banyuwangi
Usia = 18

Yes