Program Menentukan Kelulusan Mahasiswa Menggunakan Turbo Pascal

Program Menentukan Kelulusan Mahasiswa Menggunakan Turbo Pascal - Berikut adalah contoh program menentukan kelulusan mahasiswa dengan data : Jika nilai mahasiswa A atau B maka lulus, jika nilai mahasiswa C dan D maka perbaikan selainnya Gagal.
Maka contoh programnya adalah sebagai berikut :

program Menentukan_Kelulusan_Mahasiswa;
uses crt;
var
kode:string;
a,b,c,d,e:char;
begin
    clrscr;