Dimulai dar1 :
- if-else if.
- Program mencetak nilai
- cls
- locate 1 : Print "*_*_*_*_*_*_*_*_*_*_*_*_*_*_"
- locate 2 : Print "Daftar Nilai mata pelajaran matematika"
- locate 3 : Print "||||\/\/\/\//\/\/\/\/\/\/\/\/\/\/\/\/\||||"
- locate 4 : print "NIM =";:input,nim$
- locate 5 : print "NAMA =";:input,nama$
- locate 6 : print "KELAS =";:input,kelas$
- locate 7 : print "JENIS KELAMIN =";:input,jenis$
- locate 8 : print "NAMA PENGAJAR=";:input,pengajar$
- locate 9 : print "SEMESTER=";:input,smt$
- locate 10 : print "NILAI TUGAS =";:input,NT!
- locate 11 : print "NILAI KUIS =";:input,NK!
- locate 12 : print "NILAI UTS =";:input,NU!
- locate 13 : print "NILAI UAS =";:input,NS!
- locate 14 : print "NILAI KEHADIRAN=";:input,NN!
- let jumlah=NT!+NK!+NU!+NS!+NN!
- locate 15 : print "TOTAL NILAI ANDA =";jumlah
- let rata=jumlah/5
- locate 16 : print "NILAI ANDA=";rata
- print "TENTANG NILAI ANDA=";rata
- if rata>=90 and rata <=100 then
- print "TENTANG NILAI ANDA= SANGAT PAHAM (A) "
- elseif rata >=80 and rata<=89 then
- print "TENTANG NILAI ANDA= PAHAM (B) "
- elseif rata >=70 and rata<=79 then
- print "TENTANG NILAI ANDA= CUKUP PAHAM (C) "
- elseif rata >=60 and rata <=69 then
- print "TENTANG NILAI ANDA= KURANG PAHAM (D) "
- elseif rata <60 then
- print "TENTANG NILAI ANDA=SANGAT KURANG PAHAM (E) "
- end if
- end
Berikut program-programnya:
Ketikkan pada turbo basic anda, seperti berikut:
Berikut tampilan program dalam turbo basic :
Berikut tampilan hasil dari program diatas :
Itulah program turbo basic sederhana saya, untuk program lainnya silahkan ke blog saya berikutnya ya:D , terimakasih atas kunjungannya di bagian ini .
Boleh nih jd bahan praktek..
BalasHapus