A.Pengertian Percabangan
Percabangan adalah proses pemilihan suatu tindakan yang
dilakukan berdasarkan kondisi yang ada dengan nilai true atau false.
Pada pemrograman Pascal terdapat
beberapa cara seleksi diantaranya:
if then… , if… then…
else…, dan case.
1.
if… then…
If (kondisi)
Then
Begin
Statement1;
End;
Then
Begin
Statement1;
End;
Bila kondisi terpenuhi maka
statment1 dijalankan. jika tidak terpenuhi maka program tidak melakukan
apa-apa.
Contoh penggunaan if:
uses
crt;
var
jenisKelamin:char;
begin
clrscr;
writeln('Jenis Kelamin:');
writeln('L untuk laki-laki, P untuk
perempuan');
writeln('Jenis kelamin anda:
');readln(jenisKelamin);
if(jenisKelamin = 'l') then
writeln('Laki-Laki');
if(jenisKelamin = 'p') then
writeln('Perempuan');
readkey;
end.
2. if… then… else…
If (kondisi)
Then
Begin
Statement1;
End
Else
Begin
Statement2;
End;
If (kondisi)
Then
Begin
Statement1;
End
Else
Begin
Statement2;
End;
jika kondisi terpenuhi, maka
statement1 akan dijalankan. Jika kondisi tidak terpenuhi, maka statement2 akan
dijalankan.
2.Case
Digunakan
untuk kondisi yang sudah diketahui nilainya.
Case (variabel)
of
Option1 : begin
Statements 1
end;
Option2 : begin
Statements 2
end;
.
.
.
Else begin
Statements
End;
End;
Option1 : begin
Statements 1
end;
Option2 : begin
Statements 2
end;
.
.
.
Else begin
Statements
End;
End;
contoh penggunaannya:
uses
crt;
var
jurusan:integer;
begin
clrscr;
writeln('Kode jurusan:');
writeln('67: TI, 68: SI, 69: DKV, 70: PTI');
writeln('Jurusan anda: ');readln(jurusan);
case(jurusan) of
67 : writeln('Jurusan Teknik Informatika');
68 : writeln('Jurusan Sistem Informasi');
69 : writeln('Jurusan Design Komunikasi
Visual');
70 : writeln('Jurusan Pendidikan Teknik
Informatika');
else writeln('Anda salah jurusan');
end;
readkey;
end.
Suatu
tanda kondisi diperlukan saat kondisi tersebut membutuhkan batasan-batasan.
dalam pascal, tanda kondisi disimbolkan:
= untuk sama dengan, contoh (nilai = 80) then….;
>= untuk lebih besar sama dengan, contoh (nilai >=80) then…;
80) then…;
> untuk lebih besar dari, contoh (nilai > 80) then….;
< untuk lebih kecil dari, contoh (nilai < 80) then…;
dalam pascal, tanda kondisi disimbolkan:
= untuk sama dengan, contoh (nilai = 80) then….;
>= untuk lebih besar sama dengan, contoh (nilai >=80) then…;
80) then…;
> untuk lebih besar dari, contoh (nilai > 80) then….;
< untuk lebih kecil dari, contoh (nilai < 80) then…;
pada beberapa kondisi operator
boolean sangat diperlukan:
AND : kondisi terpenuhi jika dan hanya jika semua kondisi bernilai true..
OR : kondisi terpenuhi jika dan hanya jika salah satu kondisi bernilai true..
AND : kondisi terpenuhi jika dan hanya jika semua kondisi bernilai true..
OR : kondisi terpenuhi jika dan hanya jika salah satu kondisi bernilai true..
Tidak ada komentar:
Posting Komentar