Instruksi Pemilihan Bahasa BASIC

 Instruksi Pemilihan Bahasa BASIC

Pemilihan artinya ”proses, cara, perbuatan memilih”, pemilihan sering terjadi dalam kehidupan kita contohnya saat berbelanja dipasar kita dihadapkan atas banyak pilihan seperti buah apel hijau atau merah, lalu pilih apel merah, timbul pilihan baru yaitu apel merah harga 10000 atau apel merah harga 15000 hingga pada akhirnya kita menemukan pilihan yang sesuai dengan kondisi yang kita inginkan atau kondisi yang terjadi, misal kondisi ekonomi seadanya dan kita suka apel merah maka pilihan jatuh pada apel merah harga 10000.
Intruksi pemilihan adalah Intruksi yang dipakai untuk memilih satu aksi dari beberapa kemungkinan aksi berdasarkan suatu persyaratan – IF THEN ELSE atau CASE

Ringkasan Instruksi Pemilihan Bahasa BASIC beserta contohnya sebagai berikut :

Algoritma

BASIC

If(kondisi)

Then aksi-1;

Else aksi-2;

Endif.

IF(kondisi) THEN

Aksi-1

ELSE

Aksi-2

ENDIF

case(variabel)

Nilai-1:statement-1;break;

Nilai-2:statement-2;break;

Nilai-3:statement-3;break;

….

default : statement-n;

endcase.

SELECT CASE variabel

CASE nilai-1

Statement-1

CASE nilai-2

Statement-2

CASE nilai-3

Statement-3

CASE ELSE

Statement-n

END SELECT

Contoh :

Algoritma Gaji_Karyawan

{algoritma yang menerima nama, golongan serta jam-kerja kemudian menampilkan total gaji yang diterima karyawan}

 

Deklarasi

real gaji,total,jamkerja,lembur,upah;

string nama;

char golongan;

 

Dekripsi

Write(“masukkan nama karyawan : “);

Read(nama);

Write(“masukkan golongan-nya : “);

Read(golongan);

Write(“masukkan jam kerjanya : “);

Read(jamkerja);

 

Case(golongan)

‘A’:upah <- 4000;break;

‘B’:upah <- 5000;break;

‘C’:upah <- 6000;break;

‘D’:upah <- 7000;break;

Default : write(“golongannya salah! “);

Endcase.

 

If (jamkerja>150)

Then

lembur <- (jamkerja – 150)*upah*1.25;

Gaji<-150*upah;

Else

lembur<-0

gaji <- jamkerja*upah;

endif

 

total<-gaji+lembur;

write(“Gaji yang diterima sdr :”,nama,”adalah = Rp. “, total);

Contoh :

REM Program perhitungan gaji karyawan

‘Program ini menerima nama,golongan

‘serta jam-kerja kemudian menampilkan

‘total gaji yang diterima karyawan.

 

INPUT “Masukkan nama karyawan :”;nama$

INPUT “Masukkan golongan-nya :”;golongan$

INPUT”Masukkan jam kerjanya :”;jamkerja$

 

SELECT CASE golongan$

CASE ‘A’

Upah = 4000

CASE ‘B’

Upah = 5000

CASE ‘C’

Upah = 6000

CASE ‘D’

Upah = 7000

CASE ELSE

PRINT”golongannya salah !”

ENDSELECT

 

IF (jamkerja>150) THEN

Lembur=(jamkerja – 150)*Upah*1.25

Gaji=150*Upah;

ELSE

Lembur=0;

Gaji=jamkerja*upah

ENDIF

 

Total=Gaji+Lembur

PRINT”Gaji yang diterima sdr : ”;nama$;” adalah=Rp. ”;Total

END

 

 

 

 

Demikian pembahasan terkait input-output bahasa basic, semoga bermanfaat dan mudah dipahami.
Selamat belajar, semoga berhasil !, Untuk Materi Bahasa BASIC yang lain dapat kalian temui pada blog ini, silakan cari pada menu penelusuran "Telusuri" atau klik label Pemrograman, Terima kasih !! silakan bertanya dan tinggalkan komentarnya yaa… you are the happiest person……

Referensi : Suarga.2012.Algoritma dan Pemrograman.Yogyakarta:ANDI


0 comments:

Post a Comment