Операторы условного перехода.
Оператор if
Чтобы проверить какое-то условие и выполнить ту или иную часть программы, существует оператор i f . В простейшем случае он записывается так:
if a=5 then a := а*2;
Если условие а=5 верно (в данном случае), то выполняется действие, записанное после then. Можно выполнять сразу несколько действий, вписав их в составной оператор begin-end.
Пример:
if a=5 then
begin
набор действий
а := а*2;
b := True;
end;
Таким образом, все выполняемые действия должны быть записаны между словами begin и end (составной оператор). Обратите внимание, что после begin не ставится точка с запятой, так как это продолжается один оператор (до end). А между begin и end в конце строк точки с запятой ставятся.
Оператор if можно записать и так, как показано в примере:
if a=5 then
begin
набор действий
end
else
begin
другой набор действий
end;
Тогда если а=5, то выполняется первый набор действий. Если же а не равно пяти, то выполняются другие действия (записанные после слова else).
Оператор выбора case
Иногда бывает удобно использовать не if, а оператор case, который проверяет сразу много значений.
Пример:
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 указывать необязательно).