Алгоритми з розгалуженнями

Команда повного розгалуження в мові програмування Object Pascal має такий загальний вигляд:
If <логічний вираз >
Then begin
             < послідовність команд 1 >   
          end
Else begin
             < послідовність команд 2 >
          end;
Виконання цієї команди відбувається так: обчислюється значення логічного виразу; якщо це значення true, то виконується послідовність команд 1 і після цього виконується команда, наступна за розгалуженням;  якщо це значення false, то виконується послідовність команд 2 і після цього виконується команда неповного розгалуження.
Є в Objet Pascal і команда неповного розгалуження:
       If  < логічний вираз  >
       Then begin
                     < послідовність команд >
                 end;
Виконання цієї команди відбувається так: обчислюється значення логічного виразу; якщо це значення true, то виконується команда, наступна за розгалуженням; якщо це значення  false, одразу виконується команда, наступна за розгалуженням.