Label

Kamis, 28 November 2013

la prolog membuat menu

Coding. Logika:
menu:-nl,         Untuk membuat menu.
write('----Menu----'),nl, untuk menampilkan tulisan menu.
write('1. Biodata'),nl, untuk menampilkan 1. biodata
write('2. persegi'),nl, untuk menampilkan 2. persegi
write('3. keluar'),nl, untuk menampilkan 3. Keluar.
write('masukam pilihan:'),read(PIL),nl, untuk menampilkan masukan pilihan dan input nilai PIL
(PIL=1,nl,         jika pilihan di pilih 1 maka akan.
write('----Biodata----'),nl, menampilkan biodata
write('nama saya:'),read(A),nl, untuk menampilkan input nama
write('npm saya:'),read(B),nl, untuk menampilkan input NPM
write('----------'),nl,
write('nama saya:'),write(A),nl, untuk menampilkan nama hasil input
write('npm saya:'),write(B),nl, untuk menampilkan npm hasil input
menu; untuk kembali kemenu
PIL=2,nl,         jika pilihan dipilih 2 maka akan menghitung persegi
write('masukan panjang:'),read(P),nl, untuk menampilkan input panjang
write('masukan lebar:'),read(LB),nl, untuk menampilkan input lebar
L is P*LB,         rumus persegi
write('luas persegi:'),write(L),nl, untuk menampilkan hasil hitung luas persegi
menu; kembali kemenu
PIL=3,nl,          jika pilihan dipilih 3 maka akan menampilkan kata terima 
write('Terimakasih'),nl). Kasi dan aplikasi berakhir

Tidak ada komentar:

Posting Komentar