PROGRAM SELECT CASE
10 CLS adalah untuk membersihkan layar output yang lama
dan mengganti dengan yang baru dengan disertai Line Number 10
perintah PRINT (cetak) untuk “====MENU====”, “1.
Biodata”, “2. KONDISI”, “3. PERULANGAN”, “4. EXIT yang
ditampilkan dilayar output
v
perintah “MASUKKAN PILIHAN ANDA : “, PIL adalah
untuk memasukan pilihan yang ada pada MENU
v
perintah SELECT CASE kepada PIL,
sehingga perintah CASE ini berlaku untuk variable antara 1-4 saja
v
Jika variabel yang dipilih adalah 1 (CASE
1), maka perintah yang ada di CASE 1 akan berjalan. Perintahnya yaitu
:
v
Perintah PRINT “==== BIODATA====” untuk
mencetak program biodata pada layar output
v
Perintah INPUT “MASUKKAN NAMA ANDA” (masukan)
untuk variabel yang akan dimasukan ke NAMA $, variabel NAMA $ itu
sendiri merupakan data String
v
Perintah INPUT “MASUKKAN KELAS ANDA” (masukkan
untuk variabel yang akan dimasukkan ke KELAS$, variebel KELAS$ itu
sendiri merupakan data String
v
Perintah INPUT “MASUKKAN NPM ANDA” (masukkan
untuk variabel yang akan dimasukkan ke NPM$, variebel NPM$ itu
sendiri merupakan data String
v
CLS untuk membersihkan layar output yang
lama dan mengganti dengan yang baru
v
Perintah PRINT “NAMA ANDA ADALAH “, NAMA$
untuk mencetak variable NAMA$
v
Perintah PRINT “KELAS ANDA ADALAH “, KELAS$
untuk mencetak variable KELAS$
v
Perintah PRINT “NPM ANDA ADALAH “, KELAS$
untuk mencetak variable NPM$
v
GOTO 50 diberikan agar program kembali
ke Line Number 50
Jika variabel yang dipilih adalah 2 (CASE 2), maka
perintah yang ada di CASE 2 akan berjalan. Perintahnya yaitu :
v
Perintah PRINT “==== KONDISI====” untuk
mencetak program KONDISI pada layar output
v
Perintah INPUT “MASUKKAN NILAI UAS : “,
UAS adalah untuk masukkan variabel yang akan dimasukkan ke UAS
v
Perintah INPUT “MASUKKAN NILAI UTS : “, UTS adalah
untuk masukkan variabel yang akan dimasukkan ke UTS
v
HASIL = (UAS * .3) + (UTS* .7) adalah hasil
dari UAS dikalikan dengan 0.7 dan dijumlahkan dengan UTS dikalikan dengan 0.7
v
PRINT mencetak
v
IF HASIL >= 60
o
PRINT “ANDA LULUS!!!”
o
ELSE
o
PRINT “ANDA GAGAL” adalah perintah jika
hasil bernilai lebih dari 60 maka akan mencetak variabel “ANDA
LULUS!!!” jika tidak(ELSE) atau nilai kurang dari 60 akan mencetak
variabel “ANDA GAGAL!!!”
v
END IF mengakhiri perintah IF
v
GOTO 50 diberikan agar program kembali
ke Line Number 50
Jika variabel yang dipilih adalah 3 (CASE 3), maka
perintah yang ada di CASE 3 akan berjalan. Perintahnya yaitu :
v
Perintah PRINT “==== PERULANGAN====” untuk
mencetak program PERULANGAN pada layar output
v
INPUT “MASUKKAN ANGKA : “, A adalah untuk
memasukan data dengan variable A
v
FOR C = A TO 1 STEP-1 adalah untuk
melakukan perulangan dari variable A sampai 1 dan perulangan selanjutnya mundur
1
v
FOR B = 1 TO C adalah untuk melakukan
perulangan dari 1 sampai C
v
PRINT C ; adalah untuk mencetak variable C
v
NEXT C adalah untuk melakukan
statement C
v
PRINT adalah untuk mencetak di kolom
selanjutnya
v NEXT
B adalah untuk melakukan statement B
v
GOTO 50 diberikan agar program kembali
ke Line Number 50
Jika variabel yang dipilih adalah 4 (CASE 4), maka
perintah yang ada di CASE 4 akan berjalan. Perintahnya yaitu :
v
40 PRINT “TERIMAKASIH^^” digunakan untuk
mencetak TERIMAKASIH
v
GOTO 100 diberikan agar program kembali
ke Line Number 100
v
CASE ELSE adalah untuk melakukan perintah
selain case yang ada
v
PRINT “PILIHAN TIDAK ADA” adalah untuk
mencetak PILIHAN TIDAK ADA
v
GO TO 50 diberikan agar program kembali
ke Line Number 50
v
END SELECT adalah untuk mengakhiri perintah
select
v
50 INPUT “MAU COBA LAGI [Y/N] : “, S$ digunakan
untuk memasukkan nilai dimana berada di line 50 dan akan disimpan kedalam
variabel S$
v
IF S$ = “y” OR S$ = “Y” THEN adalah
perintah jika s$ bernilai Y(besar) atau y(kecil) maka akan pergi ke line 10
v
GOTO 10 diberikan agar program kembali
ke Line Number 10
v
ELSE adalah selain dari itu
v
GOTO 40 diberikan agar program kembali
ke Line Number 40
v
END IF adalah untuk perintah mengakhiri IF
v
100 END mengakhiri perintah program
- Keluaran (output) jika dipilih variabel 1
2. Keluaran(
output) jika dipilih variabel 2
3. Keluaran
(output) jika dipilih variabel 3
4. Keluaran
(output) jika dipilih variabel 4
5. Keluaran
(output) SELECT CASE
Tidak ada komentar:
Posting Komentar