Senin, 26 Maret 2012

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.