Habibullah Al Faruq

Portal Situs Edukasi SD, SMP, SMA/SMK dan Perguruan Tinggi di Jaringan Luas Indonesia

8 Nov 2015

Contoh Syntax Case Of X pada Pascal

Contoh Syntax Case Of X pada Pascal - Setelah sebelumnya membahas pada Syntax Program Pascal Menghitung Luas dan Keliling Persegi, maka saat ini akan membahas mengenai Case Of X pada Pascal.

Cara ini sama mudahnya dengan praktik yang lalu masih dalam Pascal.

Oh ya, jangan sampai ada yang terlewat entah itu titik koma atau apapun, jika ada yang terlewat, program tidak akan berjalan.

Case of

program Nilai;
uses WinCrt;
var x : integer;

begin
write('Masukkan nilai 0 - 100 : ');
read(x);
case of x then
90..100:writeln('Sangat Baik');
75..89:writeln('Baik');
50..74:writeln('Kurang');
0..49:writeln('Sangat Kurang');
end.

Silakan dicoba dan sudah dites bahwa syntax tersebut 100% bekerja!
“Jika seseorang meninggal dunia, maka terputuslah amalannya kecuali tiga perkara yaitu: sedekah jariyah, ilmu yang dimanfaatkan, atau do’a anak yang sholeh.” (HR. Muslim no. 1631) - YUK SHARE DI FACEBOOK, TWITTER dan GOOGLE+!
Author Profile

About Habibullah Al Faruq

6 tahun menuntut ilmu di SDN, 3 tahun memperluas wawasan di SMPN, 3 tahun lagi menggali jati diri di SMKN dan kini menjadi mahasiswa di Universitas Muhammadiyah Purwokerto, jurusan Teknik Informatika.

1 Response to Contoh Syntax Case Of X pada Pascal

  1. Baru denger case of x ini...
    Oya, itu untuk logikanya apakah memang sudah ditetapkan dengan rentang 0 s.d 100 ?
    Jika lebih dari 100 maka output yg keluar apa ya?

    ReplyDelete

Wah! Orang-orang di sekitar kita telah berkomentar sebanyak lebih dari 850 komentar! Sekarang giliran kalian! Ayo berpendapat!

Back To Top