PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL - Hallo sahabat Dev-Create, Pada Artikel yang anda baca kali ini dengan judul PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan Artikel Pascal, Artikel program, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.

Judul : PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL
link : PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL

Baca juga


PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL


uses crt;
var
npm, nama, ket : string;
nh,nt, nuas, nuts:integer;
nilai_huruf:char;
na:real;

begin
clrscr;
writeln('PROGRAM PERHITUNGAN NILAI MAHASISWA');
writeln('===================================');
writeln;
write('NPM : ');readln(npm);
if (npm='1') then
nama:='Hendro'
else if (npm='2') then
nama:='Dian'
else if (npm='3') then
nama:='Jhoni';
writeln('Nama :',nama);
write('Nilai Hadir :');readln(nh);
write('Nilai Tugas :');readln(nt);
write('Nilai UTS :');readln(nuts);
write('Nilai UAS   :');readln(nuas);

na := 0.1*nh+nt*0.2+nuts*0.3+nuas*0.4;

if (na>=80) and (na<=100) then
nilai_huruf:='A'
else if (na>=70) and (na<=79) then
nilai_huruf:='B'
else if (na>=60) and (na<=69) then
nilai_huruf:='C'
else if (na>=50) and (na<=59) then
nilai_huruf:='D'
else if (na<50) then
nilai_huruf:='E';

case nilai_huruf of
    'A' : ket := 'Lulus Sangat Memuaskan';
    'B' : ket := 'Lulus Dengan Baik';
    'C' : ket := 'Lulus Dengan Cukup';
    'D' : ket := 'Gagal';
    'E' : ket := 'Gagal';
    end;


writeln('nilai akhir:',na);
writeln('keterangan:',ket);
writeln('Nilai Huruf:',nilai_huruf);
READLN;
end.
 Hasil OUTPUT


 














Ini File Nya


Demikianlah Artikel PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL

Sekianlah artikel PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.

Anda sekarang membaca artikel PROGRAM PERHITUNGAN NILAI AKHIR MAHASISWA DI PASCAL dengan alamat link https://dev-create.blogspot.com/2016/05/program-perhitungan-nilai-akhir.html