CONTOH PROGRAM INPUT BIODATA,SEGITIGA,DAN MEMILIH MENU MAKANAN PADA PROLOG.

-

CODINGAN:

1. 

 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. 

menu:-nl,
    write('      SELAMAT DATANG!      '),nl,
    write('****MENU RESTORAN ABANG****'),nl,
    write('1 BAKSO '),nl,
    write('2 MIE AYAM '),nl,
    write('3 SATE PADANG '),nl,
    write('4 SATE KAMBING '),nl,
    write('5 EXIT'),nl,
    write('masukan pilihan :'),read(PIL),nl,

    (PIL=1,nl,
    write('BAKSO'),nl,
    write('JUMLAH : '),read(O),nl,
    BO is (O*10000),
    write('TOTAL BAYAR: '),write(BO),nl,
    menu;
    PIL=2,nl,
    write('MIE AYAM'),nl,
    write('JUMLAH : '),read(A),nl,
    MA is (A*15000),
    write('TOTAL BAYAR: '),write(MA),nl,
    menu;
    PIL=3,nl,
    write('SATE PADANG'),nl,
    write('JUMLAH : '),read(P),nl,
    SP is (P*5000),
    write('total: '),write(SP),nl,
    menu;
    PIL=4,nl,
    write('SATE KAMBING'),nl,
    write('JUMLAH : '),read(K),nl,
    SK is (K*5000),
    write('TOTAL BAYAR: '),write(SK),nl,
    menu;
    PIL=5,nl,
    write('EXIT'),nl).





jangan lupa klo mau run program harus diakhiri dengan titik (.)

Komentar

Posting Komentar

Postingan populer dari blog ini

Pengertian Algoritma Beserta Penjelasannya

-
Gambar
Blog Informatika Materi Informatika, Tutorial dan Tips Bidang IT Home Android Windows Photoshop Materi Informatika Site Map Blog Informatika   Informatika   Algoritma dan Flowchart, Dasar Pemrograman Algoritma dan Flowchart, Dasar Pemrograman Tujuan Pembelajaran Diharapkan dapat: 1.  Mengerti tentang algoritma 2.  Membuat algoritma dari suatu permasalahan 3.  Mengerti tentang flowchart 4.  Membuat flowchart dari suatu permasalahan Pendahuluan 1.  Komputer adalah alat bantu untuk menyelesaikan masalah 2.  Dalam menyelesaikan masalah dengan komputer perlu merumuskan langkah-langkah penyelesaian masalah dalam sekumpulan instruksi 3.  sekumpulan instruksi yang dimengerti oleh komputer disebut dengan program Bahasa Pemrograman 1.  Program harus ditulis dalam suatu bahasa yang dimengerti oleh komputer yaitu dalam bahasa pemrograman, dibedakan menjadi: ·         Bahasa tingkat rendah (low
Baca selengkapnya

Aplikasi Project Management System Untuk Buka Usaha

-
Gambar
Software Manajemen Proyek Online Terbaik untuk Usaha Kecil Software manajemen proyek online adalah sumber daya yang hebat untuk waktu-waktu ketika Anda harus berkutat dengan tenggat waktu, sumber daya, dan kiriman-kiriman barang. Penting untuk setiap saat Anda mengelola suatu proyek profesional, yang usaha kecil Anda bergantung kepadanya. Dengan tipe software ini, Anda bisa memastikan bahwa Anda menjaga agar usaha kecil Anda berjalan secara efisien. Anda tidak akan tertinggal dalam proyek-proyek, kehilangan pelacakan atas tenggat waktu, atau melewatkan berbagai tonggak penting yang kritis. Dengan software online untuk manajemen proyek yang tepat, Anda akan selalu bisa memantau proyek-proyek yang sedang mengantri di daftar Anda. Terdapat juga manfaat dalam menggunakan daya ungkit cloud dan bekerja dengan software yang mengintegrasikan secara online, seperti bisa bekerja dengan mudah dengan tim Anda dari lokasi manapun. Anda juga bisa mengakses pelacakan proyek Anda melal
Baca selengkapnya

CONTOH PROGRAM BIODATA,UTS&UAS DAN VOLUME KERUCUT PADA PROLOG.

-
Gambar
 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 : 
Baca selengkapnya