Assalamu'alaikum Wr Wb
Selamat datang di
sibukngoding.com. Pada kesempatan kali ini saya akan menjelaskan contoh program
menggunakan fungsi Case yaitu program konversi nilai dari angka ke huruf.
Seperti yang kita ketahui bahwa percabangan pada bahasa pemrograman pascal ada
2 yaitu fungsi IF dan fungsi Case. Untuk contoh program konversi nilai menggunakan
fungsi IF bisa dilihat disini.
Adapun untuk konversi yang akan kita coba aplikasikan ke
program adalah sebagai berikut
Jadi seumpama kita memasukkan nilai antara 90 sampai 100 maka akan tampil tulisan nilai A. Lalu jika kita memasukkan
nilai antara 80 sampai 89 akan
tampil tulisan nilai B, begitu
seterusnya sampai nilai dibawah 50
akan tampil tulisan Nilai E Untuk
Source code nya, sebagai berikut:
PROGRAM KONVERSI_NILAI;
uses crt;
var nilaiAngka: integer;
begin
clrscr;
write('Masukkan nilai : ');
readln(nilaiAngka);
case (nilaiAngka) of
0..49 : write('Nilai E');
50..59 : write('Nilai D');
60..79 : write('Nilai C');
80..89 : write('Nilai B');
90..100 : write('Nilai A');
else
writeln('INPUT DATA SALAH');
end;
readkey;
end.
Dari source diatas, bisa dilihat,
jika kita memasukkan nilai 60 maka hasil yang ditampilkan adalah “Nilai C”
karena yang memenuhi syarat adalah aksi nomor 3 yaitu 60..79
: write('Nilai C');.
Untuk hasil lebih jelasnya sbb:
Untuk hasilnya sama dengan jika
kita menggunakan fungsi if. Kesimpulannya, fungsi case..of dan fungsi If itu
pada dasarnya sama. Perbedaannya adalah inputan pada fungsi case hanya bisa berupa angka,
tidak bisa berupa huruf atau Karakter. Berbeda dengan fungsi if, kita bisa
menggunakan karakter dalam inputannya.
Demikian contoh program konversi
nilai pada pascal, semoga bisa menjadi referensi bagi anda yang sedang belajar
bahasa pemrograman pascal. Artikel ini saya ambil dari blog saya yang lama
annur24.wordpress.com. Jika ada pertanyaan bisa ditanyakan lewat kolom komentar
dan jangan lupa untuk mengunjungi web sibukngoding.com untuk contoh program
lainnya.
Terimakasih atas kunjungannya,
selamat belajar dan jangan mudah menyerah
Wassalamu’alaikum Wr Wb
Comments
Post a Comment
- Berkomentarlah dengan bijak, Komentar akan di moderasi dahulu sebelum ditampilkan.