Operator di strawberry prolog

?- menu.

menu :-

write("-MENU-"), nl,

write("1. Penjumlahan"), nl,

write("2. Pengurangan"), nl,

write("3. Perkalian"), nl,

write("4. Pembagian"), nl,

write("5. Exit"), nl,

write("Pilihan Anda : "), read(Pil), write(Pil), nl,

(Pil = 1, nl,

write("Nilai A :"), read(A), write(A), nl,

write("Nilai B :"), read(B), write(B), nl,

Nilc is A+B,

write("Hasil A+B ="), write(Nilc), nl, nl,

menu;

Pil = 2, nl,

write("Nilai A :"), read(A), write(A), nl,

write("Nilai B :"), read(B), write(B), nl,

Nilc is A-B,

write("Hasil A-B ="), write(Nilc), nl, nl,

menu;

Pil = 3, nl,

write("Nilai A :"), read(A), write(A), nl,

write("Nilai B :"), read(B), write(B), nl,

Nilc is A*B,

write("Hasil A*B ="), write(Nilc), nl, nl,

menu;

Pil = 4, nl,

write("Nilai A :"), read(A), write(A), nl,

write("Nilai B :"), read(B), write(B), nl,

Nilc is A/B,

write("Hasil A/B ="), write(Nilc), nl, nl,

menu;

Pil = 5, nl,

write("Finished"), nl).

?- menu. ?- ini adalah statement awal dari seluruh program strawberry prolog. Setelah itu ketik

menu :- yang artinnya kita akan membuat sebuah menu, dan dilanjutkn mengetik write("-MENU-"), nl,

write("1. Penjumlahan"), nl,  write("2. Pengurangan"), yang artinya kita menulis sebuah kalimat Menu, dan nl, adalah sebuah new line atau garis baru, jika kita menginginkan output nya tercetak dibawah kalimat sebelumnya, maka ketik nl,. Setelah itu perintah  read(Pil), write(Pil), nl, maksud nya adalah kita menulis sebuah pilihan dan membaca sebuah pernyataan pilihan. (Pil = 1, nl, artinya jika pilihan yang kita pilih adalah nomer 1, maka  write("Nilai A :"), read(A), write(A), nl, maksud nya di Output akan tetulis Nilai A: kemudian nilai A yang di input akan dibaca dengan input A, dan kemudian ditulis(dlam output A).Sama juga hal nya dengan write("Nilai B :"), read(B), write(B), nl,. Kemudian perintah       Nilc is A+B, maksudnya adalah Nilai c adalah hasil penjumlahan antara nilai input A dengan nilain input B, kemudian perintah write("Hasil A+B ="), artinya  A+B= akan tertulis di output, dan write(Nilc), nl, nl, hasil dari penjumlahan a dan b akan ditulis. Nl, nl, maka akan membuat new line sebanyak 2 kali, atau enter 2 kali.

(Pil = 2, nl, artinya jika pilihan yang kita pilih adalah nomer 2 yaitu pengurangan, maka  write("Nilai A :"), read(A), write(A), nl, maksud nya di Output akan tetulis Nilai A: kemudian nilai A yang di input akan dibaca dengan input A, dan kemudian ditulis(dlam output A).Sama juga hal nya dengan write("Nilai B :"), read(B), write(B), nl,. Kemudian perintah       Nilc is A-B, maksudnya adalah Nilai c adalah hasil pengurangan antara nilai input A dengan nilain input B, kemudian perintah write("Hasil A-B ="), artinya  A-B= akan tertulis di output, dan write(Nilc), nl, nl, hasil dari pengurangan a dan b akan ditulis. Nl, nl, maka akan membuat new line sebanyak 2 kali, atau enter 2

Kodingan yang selanjutnya pun sama maksud nya, hanya berbeda operator saja.

Kemudian menu; 

Pil = 5, nl,  menu yang kita pilih adalah menu nomer 5, yaitu menu exit, maka perintah nya untuk keluar dari program adalah write("Finished"), nl).

ini output nya