program daftar nilai mahasiswa
Program ini
memakai bahasa pemograman basiq, program ini saya buat untuk kelengkapan tugas
akhir mata kuliah algoritma dan pemograman I..
BASIC, adalah singkatan dari Beginners’
All-purpose Symbolic Instruction Code adalah sebuah kelompok bahasa
pemrograman tingkat
tinggi. Secara harfiah,
BASIC memiliki arti "kode instruksi simbolis semua tujuan yang dapat
digunakan oleh para pemula". Memang, istilah "Bahasa BASIC" di
sini juga bisa diartikan menjadi bahasa untuk pemula, atau dengan kata lain,
disebut sebagai bahasa dasar, tapi hal tersebut dirasa kurang tepat, mengingat
BASIC dapat juga digunakan oleh para pemrogram ahli.
Berikut gambar
hasil program dan kode programnya;
CLS
AM = 0
AH$ =
""
KET$ =
""
INPUT "NAMA
MAHASISWA :", NAMA$
INPUT
"KELAS/SEMESTER :", KELAS$
INPUT "MATA
KULIAH :", NMMK$
INPUT "NILAI
[0...100] :", NILAI
SELECT CASE NILAI
CASE 0 TO 30
AM = 0
AH$ = "E"
KET$ = "TIDAK LULUS"
CASE 31 TO 45
AM = 1
AH$ = "D"
KET$ = "TIDAK LULUS"
CASE 46 TO 60
AM = 2
AH$ = "C"
KET$ = "LULUS"
CASE 61 TO 75
AM = 3
AH$ = "B"
KET$ = "LULUS"
CASE ELSE
AM = 4
AH$ = "A"
KET$ = "LULUS"
END SELECT
PRINT
PRINT
"-----------------------------------"
PRINT
"NAMA :"; NAMA$
PRINT
"KELAS/SEMESTER:"; KELAS$
PRINT "MATA
KULIAH :"; NMMK$
PRINT
"NILAI :"; NILAI
PRINT "ANGKA
MUTU :"; AM
PRINT "ANGKA
HURUF :"; AH$
PRINT
"KETERANGAN :"; KET$
Tidak ada komentar:
Posting Komentar