Oke dalam kesempatan kali ini saya akan sharing tentang Selection pada pascal. Gak usah basa basi lagi langsung aja ke TKP..!!
Selection
Selection dalam pascal digunakan untuk mengontrol jalannya program agar dapat memilih salah satu dari sekian banyak pilihan yang ada.
Pada bahasa Pascal selection terdiri dari :
1. Selection if
Selection If digunakan untuk memilih salah satu atau lebih kemungkinan yang ada. Jika
statement if terdiri dari dua atau lebih pernyataan, maka pernyataan tersebut harus
Bentuk Umum selection if :
a) if dengan satu statement
if <Kondisi benar> then <Do statement>;
contoh :
if data < 10 then
write (data);
b) if dengan banyak statement
if <Kondisi benar> then
begin
<Do statement 1>;
...
<Do statement n>;
end;
contoh :
if i < 10 then
begin
gotoxy (2,2);writeln (i);
writeln;
readkey;
end;
c) if-then-else dengan satu statement
if <Kondisi benar> then
<Do statement 1>
else
<do statement 2>;
contoh :
if total = 100 then
write ('sempurna')
else
write ('cukup');
d) if-then-else dengan banyak statement
if <Kondisi benar> then
begin
<Do statement 1>;
<Do statement 2>;
...
end
else
begin
<Do statement 3>;
<Do statement 4>;
...
end;
2. Selection case
Case digunakan bila dihadapkan pada banyak pilihan. Tentu saja selection if dapat digunakan
hanya saja akan lebih sederhana jika menggunakan selection case.
Bentuk umum selection case :
a) Case dengan satu statement pada tiap kondisi
Case <variabel> of
<Kondisi 1>;<Statement 1>;
<Kondisi 2>;<Statement 2>;
<Kondisi 3>;<Statement 3>;
end;
contoh :
case ch of
'A':write ('A');
'B':write ('B');
'C':write ('C');
end;
b) Case dengan banyak statement pada tiap kondisi
Case<variabel>of
<kondisi1>:
begin
<statement1_1>;
<statement1_2>;
...
<statement1_N>;
end;
<kondisi2>:
begin
<statement2_1>;
<statement2_2>;
...
<statemen2_N>;
end;
end;
