Selamat datang di Blog Yan Paul Pala'langan

Penerapan CASE OF dalam Free Pascal

Selain IF dan IF ELSE dalam struktur kontrol percabangan pemrograman Pascal ada juga CASE OF.
Case Of digunakan pada beragam syarat. Berikut format penulisannya:
 case (variabel) of
  kondisi1 : pernyataan1;
  kondisi2 : pernyataan2;
  kondisi3 : pernyataan3;

end;
readln;

Disini saya akan berikan 2 contoh penggunaannya dalam free pascal sesuai dengan dalam video pada channel youtube saya yang bisa dilihat pada link di bawah ini.
https://youtu.be/T9Wb81S_gsw

Contoh 1:
Membuat program untuk menampilkan nama bulan sesuai dengan angka yang diinput. Contoh: jika memasukkan angka 5 maka yang akan muncul adalah Mei dan seterusnya.
Script programnya:

Outputnya:





Contoh 2:
Script programnya:


Outputnya:


Share:

No comments:

Followers

Video Terbaru

Pengunjung Blog

YP

YP