Senin, 10 Desember 2012

Struktur Kendali If Else di Pascal

Pernyataan if (if statement) akan memeriksa suatu persyaratan dan menentukan  apakah syarat tersebut benar atau salah, kemudian melakukan pekerjaan sesuai dengan nilai pernyataan tersebut. Sedangkan else merupakan pernyataan lanjutan bila hasil pemeriksaan persyaratan tidak benar.

Berikut adalah bentuk-bentuk dari pernyataan if yang sering digunakan :
If dengan satu pernyataan (statement)
1
If  (kondisi) then pernyataan ;
If dengan dua atau lebih pernyataan (statement)
1
2
3
4
5
6
If (kondisi) then
begin
pernyataan1 ;
pernyataan2 ;
…..
end;
Pernyataan If dan else
01
02
03
04
05
06
07
08
09
10
11
12
If (kondisi) then
begin
pernyataan1 ;
pernyataan2 ;
…..
end
else
begin
pernyataan1 ;
pernyataan2 ;
…..
end;
Dari bentuk bentuk pernyataan if di atas yang harus diperhatikan adalah untuk pernyataan if dan else, pernyataan-pernyataan setelah then tanpa menggunakan “;”. Dengan kata lain jika pernyataan setelah then hanya terdiri dari satu pernyataan saja makan pernyataan tersebut tanpa menggunakan “;”, namun jika pernyataan setelah then terdiri dari lebih dari satu pernyataan makan setelah end tanpa menggunakan “;”.


Program Sederhana dengan Pernyataan Kendali If.
Berikut contoh program sederhana untuk menghitung luas segitiga dan lingkaran. Yang mana perhitungan luas dua buah bangun tersebut digabung menjadi satu program, dan pemakai dapat memilih masalah mana yang akan dipecahkan.
Sebagaimana diketahui untuk menghitung luas segitiga adalah dengan :
L=1/2 . a . t
Dan luas lingkaran adalah dengan :
L= Π. r. r
Untuk lebih jelasnya salin program berikut :

 
program segitiga lingkaran;
var
alas, tinggi, jejari, luas: Integer;
pilih: Integer;
begin
Writeln('1. Segitiga   2. Lingkaran');
Readln(pilih);
if pilih = 1 then
begin
Readln(alas, tinggi);
luas := 1 / 2 * alas * tinggi;
Writeln('Luas Segitiga : ', luas);
end
else
begin
Readln(jejari);
luas := pi * Sqr(jejari);
Writeln('Luas Segitiga : ', luas);
end;
Readln;
end.
 
Jalankan program tersebut. Pada program tersebut disajikan dua macam pilihan kepada pemakai untuk menghitung luas segitiga atau luas lingkaran. Variabel pilih digunakan untuk pemakai guna menentukan pilihannya.

Tidak ada komentar:

Posting Komentar