LA Prolog III

/* Program Menu */
menu:-nl,
write('------ MENU ------'),nl,
write(' 1. Biodata '),nl,
write(' 2. Aritmatika '),nl,
write(' 3. Kondisi '),nl,
write(' 4. Exit'),nl,
write('-----------------'),nl,
write('Pilihan [1..3] : '),read(Pil),
(
    Pil = 1 ->
    write('---- BIODATA ----'),nl,
    write('Masukan Nama  : '),read(Nama),
    write('Masukan Kelas : '),read(Kelas),
    write('Masukan NPM   : '),read(NPM),

    write('Nama Saya '),write(Nama),
    write('Kelas Saya '),write(Kelas),
    write('NPM Saya '),write(NPM),
    menu;

LA Prolog II

/* Program Menghitung umur */

tuamuda:-nl,
write('Masukan Nama        : '), read(Nama),
write('Masukan Tahun Lahir : '), read(Lahir),

Umur is (2013 - Lahir),

write('Nama Saya '), write(Nama),nl,
write('Umur Saya '), write(Umur),nl,
write('Saya adalah '),
(
     Umur > 49 -> write('Orang Tua');
     Umur > 20 -> write('Dewasa');
     Umur > 12 -> write('Remaja');
     Umur > 5 -> write('Anak Kecil');
     write('Bayi')
).

LOGIKA PROGRAM
Program ini adalah program sederhana kondisi dimana kondisi pada program ini terletak pada Umur
yang mana kondisinya adalah sebagai berikut :

LP Prolog II

Soal
1. Apa yang kalian ketahui tentang program Menu pada Prolog ?
2. Buatlah contoh programnya !

LP Prolog I

Soal
1. Apa yang kamu ketahui tentang kondisi pada prolog ?
2. Contoh statment kondisi pada prolog ?

LA Prolog I

Praktikum kali ini akan membahas tentang prolog~
Anda bisa download software prolog disini~ (^0^)

Sekarang kita akan coba membuat file prolog. Disini kita akan mengunakan notepad untuk menulis codenya.
Tulis seperti di bawah ini :

nama:-nl,
write('Masukan Nama  : '),read(Nama),
write('Masukan Kelas : '),read(Kelas),
write('Masukan NPM   : '),read(NPM),

write('Nama Saya '),write(Nama),nl,
write('Kelas Saya '),write(Kelas),nl,
write('NPM Saya '), write(NPM).

Kemudian simpan dengan extension .pl

Untuk mencompilenya :
Buka SWI prolog, pilih FILE>>Consult...>>Lalu cari file yang tandi anda buat