Как программируется на Паскале полное и неполное ветвление?

Коротко:
неполное ветвление — это if <условие> then <действие> (без else),
полное ветвление — это if <условие> then <действие1> else <действие2>.

Чуть подробнее с примерами на Pascal.

Неполное ветвление (if … then)

then выполняет ровно один оператор. Если нужно несколько — заключайте их в begin … end.

pascal
Копировать код
var x: integer;
begin
  readln(x);
  if x > 0 then writeln('Положительное');       { один оператор }
  if x = 0 then                                  { несколько операторов }
  begin
    writeln('Ноль');
    writeln('Особый случай');
  end;
end.

Полное ветвление (if … then … else)

else задаёт альтернативную ветку, когда условие ложно.

pascal
Копировать код
var x: integer;
begin
  readln(x);
  if x >= 18 then
    writeln('Доступ разрешён')
  else
    writeln('Доступ запрещён');
end.

Если в ветке нужно выполнить несколько операторов — используйте begin … end:

pascal
Копировать код
if x > 0 then
begin
  inc(x);
  writeln('Был положительный, стал ', x);
end
else
begin
  dec(x);
  writeln('Не положительный, стал ', x);
end;

Цепочка условий (else if)

В Pascal пишут else if (два слова), а не elseif.

pascal
Копировать код
if x > 0 then
  writeln('Плюс')
else if x < 0 then
  writeln('Минус')
else
  writeln('Ноль');

Множественный выбор: case … of (тоже полное ветвление)

Удобно, когда вариантов много. Каждая ветка — один оператор (или блок begin … end). Необязательная ветка else обрабатывает «прочие случаи».

pascal
Копировать код
var c: char;
begin
  readln(c);
  case c of
    'a', 'e', 'i', 'o', 'u', 'y': writeln('Гласная');
    '0'..'9':                      writeln('Цифра');
  else
    writeln('Другое');
  end;
end.

Условия: что можно в if/case

• Логические выражения: =, <>, <, >, <=, >= + and, or, not.

• Пример: if (a <= b) and (b < c) then ….

Частые ошибки

1. Точка с запятой перед else — ошибка синтаксиса:

   pascal
   Копировать код
   if cond then
     writeln('да');
   else                { ← так нельзя }
     writeln('нет');
   

   else должен идти сразу после оператора из ветки then.

2. else связывается с ближайшим незакрытым if:
   чтобы избежать неоднозначности, используйте begin … end.

Итого: неполное ветвление — if … then, полное — if … then … else; для множества вариантов — case … of с возможным else.