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!

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

KEREN! Teman-teman di sekitar kita telah berkomentar sebanyak lebih dari 1000 komentar! Sekarang giliran kalian! Ayo berkomentar!

Back To Top