Contoh Program Pascal Grade Nilai

Daftar Isi [Tampil]

Contoh Program Pascal Grade Nilai akan panduancode jelaskan pada tutorial kali ini, program nilai mahasiswa pascal sering muncul pada mata kuliah algoritma.

Program yang akan kita buat pada kali ini adalah program untuk menentukan index mutu (IM) suatu mata kuliah, nilai index mutu dalam perkuliahan yaitu A, B, C, D, E, dan F.

Untuk membuat program tersebut kita pahami terlebih dahulu soal atau ketentuan dari program nya berikut ini:

A.Soal Program Pascal Grade Nilai

Membuat algoritma dan program pascal yang menentukan nilai (NA) dan nilai indeks mutu (IM) suatu matakuliah dengan 4 variabel nilai yaitu nilai UTS, UAS, TUGAS, dan kehadiran masing-masing skala 0 - 100, dengan ketentuan sebagai berikut :

1.NA = 30% UTS + 40% UAS + 20% TUGAS + 10% KEHADIRAN.

2.Jumlah kehadiran maksimum 16, jadi jika kehadiran =10 maka nilai kehadiran dihitung (10/16) x 100

Ketentuan konversi NA ke IM dirumuskan sebagai berikut :

• -Jika NA> 100 atau NA < 0 maka ditampilkan “Salah nilai”
• -Jika NA< = 100 atau NA > 80 maka ditampilkan IM = “nilai A”
• -Jika NA< = 80 atau NA > 65 maka ditampilkan IM = “nilai B”
• -Jika NA< = 65 atau NA > 50 maka ditampilkan IM = “nilai C”
• -Jika NA< = 50 atau NA > 40 maka ditampilkan IM = “nilai D”
• -Jika NA< 40 maka ditampilkan IM = “nilai E”

Input Nilai UTS (0 – 100) = ? <ENTER>
Input Nilai UAS (0 – 100) = ? <ENTER>
Input Nilai TUGAS (0 – 100) = ? <ENTER>
Input Jumlah KEHADIRAN = ? <ENTER>

>> hasil Perhitungan :
NILAI AKHIR = ….
NILAI INDEKS MUTU = ….

Dari soal diatas kita harus buatkan kedalam bentuk algorima Contoh Program Pascal Grade Nilai, contoh algoritma nya sebagai berikut:

B. Algoritma Contoh Program Pascal Grade Nilai

SKEMA ALGORITMA
Program NilaiMahasiswa
Input : uts,uas,tugas,kehadiran
Proses : Menghitung Input Nilai
Output : Menampilkan hasil perhitungan nilai sesuai problem

KAMUS DATA
Link Uses crt;
Constanta //Tidak ada
Type uts,uas,tgs,kd = real
Variabel uts:uts,uas:uas,tgs:tugas,kd:kehadiran

{Algoritma}
Begin
Uts ← uts, uas ← uas, tgs ← tugas, kd ← kehadiran
Input(uts)
Input(uas)
Input(tgs)
Input(kd)
na ← (30/100*uts)+(40/100*uas)+(20/100*tgs)+(10/16*kd)
Output(Nilai Akhir)
begin
if (na>100) then
Output(NILAI YANG ANDA MASUKAN SALAH)
else if(na<=0) then
Output(NILAI YANG ANDA MASUKAN SALAH)
ELSE IF (na<=100) and (na>=80) THEN
Output(NILAI IM ANDA : A)
else if (na<80) and (na>=65) then
Output(NILAI IM ANDA : B)
else if (na<65) and (na>=50) then
Output(NILAI IM ANDA : C)
else if (na<50) and (na>=40) then
Output(NILAI IM ANDA : D)
else if(na<40) then
Output(NILAI IM ANDA : E)
End.

Setelah algoritma Contoh Program Pascal Grade Nilai nya selesai mari kita lanjut ke source code nya.

C.Source Code Program Pascal Grade Nilai

program NilaiMahasiswa;

uses crt;

  var na,tgs,uts,uas,kd : real;

begin

clrscr;

  writeln('=========================================');

  writeln('PROGRAM NILAI MAHASISWA');

  writeln('=========================================');

  write('Masukan Nilai Uts : ');readln(uts);

  write('Masukan Nilai Uas : ');readln(uas);

  write('Masukan Nilai Tugas : ');readln(tgs);

  write('masukan Kehadiran : ' );readln(kd);

  na := (30/100*uts)+(40/100*uas)+(20/100*tgs)+(10/16*kd);

  writeln('=========================================');

  writeln('Nilai Akhir : ',na:2:0);

  begin

  if (na>100) then

  writeln('NILAI YANG ANDA MASUKAN SALAH')

  else if(na<=0) then

  writeln('NILAI YANG ANDA MASUKAN SALAH')

  ELSE IF (na<=100) and (na>=80) THEN

  Writeln('NILAI IM ANDA : A')

  else if (na<80) and (na>=65) then

  writeln('NILAI IM ANDA : B')

  else if (na<65) and (na>=50) then

  writeln('NILAI IM ANDA : C')

  else if (na<50) and (na>=40) then

  writeln('NILAI IM ANDA : D')

  else if(na<40) then

  writeln('NILAI IM ANDA : E');

  end;

  gotoxy(1,11); writeln('=========================================');

  readln;

end.

Silahkan copy source code diatas dan buat file program pascal baru di laptop atau hp Anda, kemudian paste kan source code program nilai mahasiswa pascal diatas.

Setelah itu save dengan nama bebas terserah Anda misalnya nilaimahasiswa.pas 

Lalu run program nilai mahasiswa pascal tersebut, maka hasilnya akan seperti gambar berikut.

D.Screenshoot Contoh Program Pascal Grade Nilai

Silahkan bertanya pada kolom komentar terkait program ini, dengan senang hati panduancode akan menjawab nya.

Akhir kata dari panduancode jangan lupa titik koma.

Coba cari lagi apa yang ada inginkan pada kolom berikut:

Share this post

Donasi

Bantu Apresiasi Bantu berikan apresiasi jika artikelnya dirasa bermanfaat agar penulis lebih semangat lagi membuat artikel bermanfaat lainnya. Terima kasih.