Algoritma Pemberian Nilai Mutu

Buatlah Algoritma pemberian nilai mutu, misalnya nilai 82 akan mendapat nilai “A”. Bila ada input nilai 101 akan muncul pesan “ Nilai yang anda masukan salah” nah jika sobat sudah membaca soal yang tadi selamat saya juga dulu pernah membacanya namun jika belum gapapa lah buat pembelajaran.

1.   

1.      program Konversi_Nilai;

uses WinCrt; 

var

nilai : integer;

begin

            Write ('Masukan Nilai Anda :');

             Readln (nilai);

             Case  nilai  Of

                        0..30    : write ('E');

             31..59   : write ('D');

             60..79   : write ('C');

             80..89   : write ('B');

             90..100  : write ('A');           

             Else

                    Write ('Nilai yang anda masukan salah');

          end;

  end.

nah ini screenshoot nya

 Bagi sobat yang ingin meralat atau menambahkan bisa komen dibawah ini :D