Если условие а=5 верно (в данном случае), то выполняется действие, записанное
после then. Можно выполнять сразу несколько действий, вписав их в составной
оператор begin-end.
Таким образом, все выполняемые действия должны быть записаны между словами
begin и end (составной оператор). Обратите внимание, что после begin не ставится
точка с запятой, так как это продолжается один оператор (до end). А между
begin и end в конце строк точки с запятой ставятся.
Оператор if можно записать и так, как показано в листинге 5.5.
Листинг 5.5
if a=5 then
begin
{набор действий}
end
else
begin
{другой набор действий}
end;
Тогда если а=5, то выполняется первый набор действий. Если же а не равно пяти,
то выполняются другие действия (записанные после слова else).
Оператор выбора case
Иногда бывает удобно использовать не if, а оператор case, который проверяет
сразу много значений.
Листинг 5.6
case A of
1: s:=один;
2: s:=два;
4: s:=три;
5: s:=четыре;
6: s:=пять;
8: s:=шесть;
else s := ;
end; // case
В приведенном примере оператор case сверяет значение переменной А с указанными
вариантами. Если А=1, то выполнится первая строка, если А=4 — третья и т. д.
Если же А не будет равна ни одному из значений, то выполнится s : = ' ' после
else (else указывать необязательно).
