Percabangan Pascal 1.5

Salah satu dari tiga konstruksi fundamental adalah percabangan/branching. Dalam pascal, percabagan menggunakan syntax if then else dan case of.
Syntax:

•  IF…THEN…ELSE

A.      IF THEN
BEGIN
…
END;

B.      IF THEN ELSE:
IF kondisi [and] kondisi [or] kondisi THEN
BEGIN
…

END {memang tanpa titik koma di sini; sebelum ELSE tidak perlu titik koma!!!}
ELSE
BEGIN
…
END;Apabila kondisi terpenuhi, maka program akan menjalankan b\perintah yang ada setelah THEN. Tapi jika kondisi tidaki terpenuhi, maka program akan menjalankan program setelah ELSE.
Contoh penggunaan:
Var i: integer;
Begin
Write(‘Masukkan bilangan antara 1-100: ‘); readln(i);
If i<=50 then
Write(‘bilangan kecil’)
Else
Write(‘bilangan besar’);
End.

• CASE … OF:

Penggunaan Case OF ini lkebih berguna jika kondisi yang dibandingkan berupa range. Lihat contoh berikut:
CASE nilai OF
80..100 : grade:=’A';
70..79 : grade:=’B';
55..69 : grade:=’C';
45-54 : grade:=’D';
ELSE grade:=’E';
END;