Case of berbeda dari IF , statemen IF digunakan untuk memilih dari dua kondisi yang berbeda sedangkan statemen case digunakan untuk memilih jika terdapat lebih dari dua kondisi yang setiapnya memerlukan penanganan yang berbeda;
aturan penulisannya :
case variabel of
konstanta1 : statemen1;
konstanta2 : statermen2;
konstanta3 : statemen3;
.....
konstantaN : statemeN;
end;
contoh :
program warungfotocopy;
uses crt;
var kode,jumlah,bayar : integer;
begin
clrscr;
writeln('Kode kertas : ');
readln(kode);
writeln('jumlah : ');
readln(jumlah);
case kode of
1:bayar:=jumlah*150;
2:bayar:=jumlah*300;
3:bayar:=jumlah*500;
4:bayar:=jumlah*550;
end;
write('bayar :', bayar);
readkey;
end.
