Pada program menghitung nilai mahasiswa kita
dapat menginput nim, nama mahasiswa serta nilai yang di programkan oleh
maasiswa.
Langkah-langkah
membuat program honor yaitu:
1. Gunakan Laptop atau PC. System operasi yang saya
gunakan Windows 7
2. Pastikan anda telah menginstall aplikasi pascal,
turbo pascal version 7 yang saya gunakan.
3. Compile pascal yang telah di install
4. Pilih file change
Directory (untuk menyimpan file pada hardisk dan folrder yang telah di
pilih)
5. Klik save
6. Selanjutkan ketik koding di bawah ini:
Uses crt; Var nim, nama :string; a, b, c, d, e, f, jumlah:integer; rata : real; begin write(‘Masukkan NIM : ‘); readln(nim); write(‘Masukkan Nama : ‘); readln(nama); writeln(‘=====================================’); write(‘Masukkan Nilai Agama : ‘); readln(a); write(‘Masukkan Nilai Algoritma : ‘); readln(b); write(‘Masukkan Nilai Matematika : ‘); readln(c); write(‘Masukkan Nilai Akuntansi : ‘); readln(d); write(‘Masukkan Nilai Bahasa Inggris : ‘); readln(e); write(‘Masukkan Nilai Bahasa Indonesia : ‘); readln(f); jumlah:=a+b+c+d+e+f; rata:=(a+b+c+d+e+f)/6; writeln; writeln(‘NIM : ‘, nim); writeln(‘Nama : ‘, nama); writeln(‘Jumlah Total : ‘,jumlah); writeln(‘Rata-rata Nilai : ‘,rata:4:2); readln; end.