if - Then - Else Ve Case - Of
if....then Komutu: Belirtilen koşulun doğru olması durumunda belirtilen işlemin yapılmasını sağlamak için kullanınlır. Daha açık bir tabirle eğer verdiğim koşul gerçekleşirse şu işlemi yap manasında kullanılır.
if a>b then write('a, b den büyük'); bu komutla eğer a, b'den büyükse "a, b den büyük" metninin ekrana ekrana yazılmasını sağlamış oluyoruz.
Eğer if koşulu sağlandığında yapacağımız işlem birden fazlaysa bu işlemleri görünüm güzelliği ve anlaşılırlık bakımında şu şekilde yaptıra biliriz.
Örnek:
begin
if a>b then
begin
write('a, b den büyük');
a:=3;
end;
end.
Bu örnekte a'nın b'den büyük olması durumunda a, b den büyük" metninin ekrana ekrana yazdırıyor ve a'ya "3" değerini veriyoruz.
Else Komutu: Else komutu, if...then kalıbından sonra kullanılır ve if koşulu gerçekleşmediği taktirde yapılması istenen işlemler varsa onları yaptırmak için kullanılır.
Örnek:
begin
if a>b then write('a, b den büyük');
Else write ('b, a'dan büyük'');
end.
Bu örnekte a>b koşulu sağlanırsa ekrana "a, b'den büyük" yazdırıyoruz. Eğer koşulsağlanmazsa, ekranna "b, a'dan büyük" yazısını yazdırmışoluyoruz.
Case - Of: Case - Of komutunun kulanım amacı if komutuyla hemen hmen aynıdır ve koşul belirtmek için kullanılır..Bir değişkenin değişik değerleri için birden fazla koşul konulmak istenildiğinde ayrı ayrı if komutları yazmak yerine kolaylık sağlamak için case - of komutu kullanılır. Else komutu case - of komutu ile birlikte kullanıldığında, case - of komutu ile belirtilen koşulların hiç birinin gerçekleşmediği durumda yapılması istenilen komutların işlnmesi sağlanır.
var
sayi:intger;
begin
write('1 ile 10 arasında bir sayı girin');readln(sayi);
Case sayi Of
1:write('I');
2:write('II');
3:write('III');
4:write('IV');
5:write('V');
6:write('VI');
7:write('VII');
8:write('VIII');
9:write(IX');
10:write('X');
Else write('Girdiğiniz sayı 1 ile 10 arasında değil')
end;
end.
Bu örnekte Case - Of komutu kullanılarak, klavyeden girilen 1 ile 10 rasında sayıların romarakamı karşılığı ekrana yazdırılıyor.