CASE OF

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.

PENDAHULUAN

Pascal merupakan bahasa pemrograman yang cara penulisannya sangat dekat dengan cara penulisan algoritma structur english. Bagi yang sudah memahami algoritma, pascal  akan sangat mudah untuk dimengerti.

            Pascal itu sendiri bukanlah nama dari sang pembuat, karena yang membuat bahasa pemrograman Pascal adalah Nicklus Wirth. Sedangkan nama “PASCAL” diambil dari nama seorang ahli matematika Blaise Pascal yang berasal dari perancis, karena sudah membuat mesin hitung.

Bahasa Pascal termasuk bahasa pemrograman tingkat tinggi (High Level), yaitu pemrograman yang menggunakan bahasa yang sudah dapat dimengerti oleh manusa. Selain itu, termasuk bahasa pemrograman tersktuktur, sehingga penulisan coding-nya harus beurutan dari awal sampai akhir.

referensi : http://iotsmaga.wordpress.com/apa-itu-pascal/ 

I. Gambar Pascal Jalan

II. Bahasa Pemrograman

cari rumus gambar segitiga diatas ??


program mencari_sisimiring;
uses crt;
var alas,tinggi,miring:real;
begin
clrscr;
write('panjang alas= ');
readln(alas);
write('tinggi segitiga= ');
readln(tinggi);
miring:=sqrt((alas*alas)+(tinggi*tinggi));
write('panjang kemiringan segitiga adalah =',miring:2:2);
readln;
end.