Membuat program list menu dengan prolog


Potongan Script Menu

menu :-
write(‘——-MENU——-‘),nl,
write(‘1. Biodata’),nl,
write(‘2. Segitiga Angka’),nl,
write(‘3. Segitiga Bintang’),nl,
write(‘4. Luas Segitiga’),nl,
write(‘5. Volume Balok’),nl,
write(‘6. Volume Kubus’),nl,
write(‘7. Keluar’),nl,
write(‘Masukkan pilihan : ‘), read(PIL), nl,

Potongan Script Pilihan Menu

menu;
PIL=2,nl,
write(‘Nilai perulangan Angka : ‘),read(A),loopa(A,1),
menu;
PIL=3,nl,
write(‘Nilai perulangan Bintang : ‘),read(A),loopc(A,1),
menu;
PIL=4,nl,
write(‘Luas Segitiga’),nl,
write(‘Masukkan Alas : ‘),read(A),nl,
write(‘Masukkan Tinggi : ‘),read(T),nl,
L is A*T/2,
write(‘LUAS SEGITIGA : ‘),write(L),nl,
menu;
PIL=5,nl,
write(‘Volume Balok’),nl,
write(‘Masukkan Panjang : ‘),read(P),nl,
write(‘Masukkan Lebar : ‘),read(L),nl,
write(‘Masukkan Tinggi : ‘),read(T),nl,
V is P*L*T,
write(‘VOLUME BALOK : ‘),write(V),nl,
menu;
PIL=6,nl,
write(‘Volume Kubus’),nl,
write(‘Masukkan Sisi : ‘),read(S),nl,
V is S*S,
write(‘VOLUME KUBUS : ‘),write(V),nl,
menu;
PIL=7,nl,
write(‘Makasih’),nl).

Cara Menjalankan

  • Download file menu-prolog.pl
  • Jalankan SWI-Prolog
  • Menu File>Consult…
  • Cari file menu-prolog.pl
  • Setelah itu ketik perintah menu.
  • Misalnya pilih menu 1. untuk pilih menu biodata
  • Masukan untuk nama misalnya agus.
  • Setiap akhir inputan diakhiri tanda titik

Download

http://www.4shared.com/file/0e0h32vH/menu-prolog.html

Sekian artikel dari saya semoga bermanfaat untuk teman-teman dan anda semua…aamiin

Depok, 19-10-2011

noname

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: