STRUKTUR KENDALI ALIRAN

1. If dengan satu peryataan if(kondisi) then (peryataan) 
2. If dengan 2 atau lebih peryataan if (kondisi) then

Begin

                Pernyataan1;

                Pernyataan2;

End.

3. If dan Else

If (kondisi) then

Begin

                Pernyataan1;

                Pernyataan2;

End.

Else

Begin

                Pernyataan1;

                Pernyataan2;

End;

Contoh soal :

                Buat program sederhana dengan pernyataan if untuk menghitug luas dan keliling lingkaran.

Jawab :

Uses crt;

Var

                Luas, jejari, keliling : Real;

                Const phi=3.14;

Begin

                Writeln (‘1. Luas Lingkaran 2. Keliling Lingkaran’);

Readln (pilih);

If pilih=1 then

Begin

                Write (‘Masukan jejari =  ‘);readln(jejari);

                Luas :=phi*jejari*jejari;

Writeln (‘Luas Lingkaran : ‘,Luas);

End.