Advertisement
m301w

Algoritma dan Pemrograman 1 BASIC Topic 2 soal 4

Nov 7th, 2022 (edited)
1,706
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
QBasic 0.80 KB | None | 0 0
  1. REM Program Nilai Ujian Mahasiswa
  2. DIM nilaiujian AS DOUBLE 'Deklarasi variabel nilaiUjian'
  3.  
  4. REM Melakukan INPUT variabel nilaiUjian
  5. INPUT "masukan nukai ujian : "; nilaiujian
  6.  
  7. PRINT "Nilai ujian:";nilaiUjian
  8.  
  9. IF nilaiujian >= 90 THEN 'Melakukan evaluasi dengan statement if-then-elseif jika nilaiUjian lebih besar atau sama dengan 90‘
  10. PRINT "Grade ujian Anda adalah A"
  11. ELSEIF nilaiujian >=75 THEN 'Melakukan evaluasi dengan statement if-then-elseif jika nilaiUjian lebih besar atau sama dengan 75‘
  12. PRINT "Grade ujian Anda adalah B"
  13. ELSEIF nilaiujian >= 60 THEN 'Melakukan evaluasi dengan statement if-then-elseif jika nilaiUjian lebih besar atau sama dengan 60‘
  14. PRINT "Grade ujian Anda adalah C"
  15. ELSE 'Kondisi jika ketiga kondisi di atas tidak terpenuhi'
  16. PRINT "Grade ujian Anda adalah D"
  17. END IF
  18.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement