Page 30 - Microsoft Word - Modul pgds perulangan

Modul Pemrograman Dasar Kelas X

Perintah case (hari) of artinya saya ingin memeriksa apakah nilai dari dari
variabel hari sesuai dengan beberapa kondisi. Jika nilai variabel hari berisi angka 6 ,
maka jalankan perintah writeln (‘sabtu’), jika nilai variabel bulan adalah 5, maka
jalankan perintah writeln (‘jumat’), tapi jika nilai variabel hari berisi angka 9 maka
tidak ada perintah yang dijalankan karena nilai variabel yang dimasukkan tidak
sesuai dengan beberapa kondisi.

C. Assesment test

1. Tulias program berikut :
program struktur_case;
uses crt;
var
makanan: integer;
begin
clrscr;
write('Silahkan input angka untuk makanan (1-3): '); readln(bulan);
case (bulan) of
1 : writeln('Soto');
2 : writeln('Bakso');
3 : writeln('Lalapan');
end;
readln;
end.

Bagaimana hasil running dari program tersebut ?
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………

2. Buatlah program percabangan case…of untuk menampikan bulan lewat inputan
angka dari 1-12 !
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….

3. Buatlah program percabangan case…of untuk menampikan predikat nilai A,B,C
lewat inputan nilai A >90, B>70 C>50 !
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….

SMK Antartika 2 Sidoarjo, Dinas Pendidikan Provinsi JawaTimur 2020 24