Program Penilaian Mahasiswa

Apr 15, 2009 4 Comments by Sahabat

Halo semua. Komang kirim ya. yang ini contoh program array, untuk menghitung nilai rata-rata nilainya selama 1 semester. source codenya seperti di bawah ini:

program penilaian_MHS;{program ini untuk melihat hasil nilai mahasiswa selama 1 semester}
uses wincrt;
var nama : array[1..20] of string;
tugas, uts, uas, presensi : array[1..20] of integer;
rata : array[1..20] of real;
a,jd : byte;
begin
  clrscr;
  write('Masukkan Jumlah Data Nilai: '); readln(jd);
  for a := 1 to jd do;
  begin
    writeln('PENILAIAN UJIAN MAHASISWA');
    write('Masukkan Nama : '); readln(nama[a]);
    write('Masukkan Nilai Tugas : '); readln(tugas[a]);
    write('Masukkan Nilai UTS : '); readln(uts[a]);
    write('Masukkan Nilai UAS : '); readln(uas[a]);
    write('Masukkan Presensi : '); readln(presensi[a]);
    Rata[a]:=(0.1*tugas[a])+(0.2*uts[a])+(0.3*uas[a])+(0.4*presensi[a]);
  end;
  clrscr;
  for a := 1 to jd do;
  begin
    writeln('PENILAIAN UJIAN MAHASISWA');
    writeln('Nama : ',nama[a]);
    writeln('Nilai Tugas : ',tugas[a]);
    writeln('Nilai UTS : ',uts[a]);
    writeln('Nilai UAS : ',uas[a]);
    writeln('Presensi : ',presensi[a]);
    {untuk menampilkan semua data yang sudah dimasukkan di awal}
    writeln('Rata-rata : ',rata[a]:1:2);{untuk menampilkan rata-rata}
  end;
end.

Komang Sumertawan
komang.tf@gmail.com

Kata Kunci

program pascal nilai mahasiswa, pdf pascal mencari nilai mahasiswa rata rata mutu, program array dan while do untuk mencari total nilai dan rata rata nilai turbo pascal, program array menghitung nilai rata-rata nilai akhir, program array nilai akhir, program data record nilai ujian mahasiswa, program java case nilai uts grade, Program java untuk menampilkan rata-rata nilai tugas mahasiswa menggunakan array, program nilai akhir mahasiswa dlm c \, program pascal array untuk menentukan grade nilai.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau

4 Responses to “Program Penilaian Mahasiswa”

  1. Hendra says:

    Mas saya mau tanya tugas alg0ritma saya case 0f di pascal ?…
    Tugasnya begini nilai akhir 40% n uts + ( 50% n uas + ( 10% praktik Ket : lulus jika grade = ABCD
    tdk lulus = E
    Tl0ng ya mas ditunggu ! Txs…

  2. Shinobi Aizer says:

    Min sebenarnya bisa gunakan statement for do/while do/repeat until ?
    soalnya ane bingung dibagian situ
    dan
    misalnya diminta Nilai A : 90-100
    B : 80-89
    C : 70-79
    D : 60 -69
    E : < 59
    itu gimana gimana ya min pseudcode/algoritmanya
    mohon sarannya min

  3. Shinobi Aizer says:

    ya min singkat amat jawabnya -_-

Leave a Reply