КОНТРОЛНА СТРУКТУРА - условно гранење

Наредбa за условно гранење (во две гранки)  

                          -  IF THEN  -

Прв облик:

if услов then
  наредба;  

Втор облик:

if услов then
  наредба1
else
  наредба2;

Доколку има повеќе од една наредба истите се опфаќаат со Begin и End.

Трет облик:

if услов then
  Begin
      наредба1;
      наредба2;
        .
        .
        .
  End
else
  Begin
      наредба3;
      наредба4;
        .
        .
        .
  End;
 

Доколку има повеќе услови истите се опфаќаат со загради и се поврзуваат со логички оператори.

Пример1:

if (b = 1)  then
  b:=b+1;
if (b = 2)  then
  b:=b*2;

Пример2:

if (b = 1)  then
  b:=b+1
else
  b:=b*2;

Пример3:

b:=1;
c:=7;
if (b = 1) and (c = 7)  then
    begin
      b:=b+1;
      c:=c*3;
    end
else
    begin
      b:=b+2;
      c:=c*4;
    end;

Пример4:
if (b = 1) or (b = 7) or (b = 2037) and (b = 5) then
  b:=b+1
else
  b:=b*2;