Contoh Program Komputer Case OF Untuk Pengambilan Keputusan

Untuk dapat mengerti  contoh-contoh berikut, maka diharapkan anda telah mempelajari teori dasar, konsep dan logika pengambilan keputusan.

Contoh-1

Buatlah program untuk mencetak keterangan Nilai Huruf sebagai berikut :

     A  = Sangat Baik
     B  = Baik
    C  = Cukup
    D  = Kurang
    E  = Gagal

Jawab :

Algoritma :
•    Mulai
•    Deklarasikan variabel
•    Input Nilai Huruf
•    Cek Nilai
•    Pilih salah satu Nilai
•    Kerjakan pernyataan
•    Cetak hasil
•    Selesai

Flowchart
Afiliasi Indo web maker Unik

Kode Program

Program Case_Of;
uses crt;
Var 
    Nilai   : Char;
    Ket     : String [12];
Begin
Write ('Masukkan Nilai Huruf Anda (A/B/C/D/E)  = ');
        Readln(Nilai) ;
        Case Nilai Of
              'A' : Ket := ' Sangat Baik ' ;
              'B' : Ket := ' Baik ' ;
              'C' : Ket  := ' Cukup ' ;
              'D' : Ket := ' Kurang ' ;
              'E'  : Ket := ' Gagal ' ;
        End;

        Write (' Nilai Anda    = ', Ket) ;
        Readln ;
End.

Hasil  Program
 

















Contoh-2

Buatlah program untuk menentukan nilai Huruf dengan aturan sebagai berikut :

       0 <= Nilai <=40  adalah  E
       40 < Nilai <= 55 adalah  D
       55 < Nilai <= 69 adalah  C
       69 < Nilai <= 85 adalah  B
       85 < Nilai <= 100 adalah A



Algoritma

•    Mulai
•    Deklarasikan Variabel
•    Input Nilai
•    Cek nilai
•    Pilih salah satu Pilihan yang sesuai dengan Nilai input.
•    Kerjakan pernyataan
•    Cetak Hasil
•    Selesai

Flowchart





Kode Program

Program case_of2;
uses crt;

var n1 : integer;
    n2 : char;

Begin
      write('Input Nilai angka = ');
      readln(n1);

     case n1 of
         0..40  : n2 := 'E';
        40..55 : n2 := 'D';
        55..69 : n2 := 'C';
        69..85 : n2 := 'B';
        85..100:n2 := 'A';
     end;

      writeln;
      writeln('Anda mendapat nilai : ',n2);
      readln;
end.




Hasil  Program
 



Mohon anda memberikan komentar, saran, atau pertanyaan untuk memperbaiki materi yang ada dalam blog ini. Dengan demikian blog ini dapat semakin bermanfaat bagi para pelajar dan mahasiswa yang ingin mempelajari contoh program komputer yang dimuat di blog ini.

Semoga bermanfaat.
God bless you all.



1 comment:

Silakan memberikan komentar dan pertanyaan yang sifatnya positif.