Membuat Program Status Kelulusan

CLS
DIM p AS STRING
DIM q AS STRING
DIM r AS STRING
DIM T1, T2 AS INTEGER
PRINT "PROGRAM STATUS KELULUSAN MAHASISWA"
PRINT
PRINT "**********************************"
PRINT
INPUT "Masukkan Nama Lengkap   :", p
INPUT "Masukkan Kelas          :", q
INPUT "Masukkan NPM            :", r
PRINT
INPUT "Masukkan Nilai Tugas 1 :", T1
INPUT "Masukkan Nilai Tugas 2 :", T2
PRINT
PRINT "*****************************"
PRINT "Nama Mahasiswa :", p
PRINT "Kelas          :", q
PRINT "NPM            :", r
PRINT
Lulus = (T1 + T2) / 2
IF Lulus > 60 THEN PRINT "Selamat Anda LULUS",  ELSE PRINT "Maaf Anda GAGAL"
END