CONTOH PROGRAM BIODATA,UTS&UAS DAN VOLUME KERUCUT PADA PROLOG.
1. Codingan : menu:-nl,nl, write('MENU'),nl, write('1.BIODATA'),nl, write('2.LUAS SEGITIGA'),nl, write('3.EXIT'),nl, write('Masukkan pilihan anda : '),read(PIL),nl, (PIL=1,nl, write('BIODATA'),nl, write('MASUKKAN NAMA : '),read(A),nl, write('MASUKKAN NPM: '),read(B),nl, write('MASUKKAN KELAS : '),read(C),nl, write('-----'),nl, write('NAMA : '),write(A),nl, write('NPM : '),write(B),nl, write('KELAS : '),write(C),nl, menu; PIL=2,nl, write('---luas segitiga---'),nl, write('masukan alas : '),read(D),nl, write('masukan tinggi : '),read(E),nl, L is (0.5*D*E), write('luas segitiga = '),write(L),nl, menu; PIL=3,nl, write('Terimakasih'),nl). OUTPUT : 2. CODINGAN : program:-nl,nl, write('masukkan jari-jari='),read(J), write('masukkan tinggi='),read(T), V is (3.14*(J*J)*T)/3, write('volume kerucut'), write(V). OUTPUT :