Условный оператор работает по следующему алгоритму

Сначала вычисляется значение логического выражения (условия), расположенного за служебным словом IF. Если его результат истина, выполняется <оператор1>, расположенный после слова THEN, а действия после ELSE пропускаются; если результат ложь, то, наоборот, действия после слова THEN пропускаются, а после ELSE выполняется <оператор 2>. Перед словом Else точка с запятой не ставится.

Если в качестве оператора должна выполниться серия операторов, то они заключаются в операторные скобки begin-end. Конструкция Begin... End называется составным оператором.

if <условие> then begin оператор 1; оператор 2;...{- что делать, если условие верно} end else begin оператор 1; оператор 2;...{- что делать, если условие неверно} end;

Определение. Составной оператор - объединение нескольких операторов в одну смысловую группу с помощью операторных скобок (begin-end)

Begin

оператор 1;

оператор 2;

End;

Упр. 11: Вычислить . Предусмотреть случай, когда b=0 (нельзя делить на 0).
	Program drob; Var a,b,c: real; Begin Write (‘Введите делимое и делитель’); Read (a,b); If b=0 then writeln (‘Делить на ноль’) Else begin c:=a/b; writeln(‘Частное=’, c); end; End.

Отметим, что большинство операторов в программах на языке Паскаль заканчиваются точкой с запятой, но после некоторых операторов точка с запятой не ставится. Сформулируем общие правила употребления точки с запятой:

1. Каждое описание переменной и определение константы заканчиваются точкой с запятой.

2. Каждый оператор в теле программы завершается точкой с запятой, если сразу за ним не следуют зарезервированные слова End, Else, Until.

3. После определенных зарезервированных слов, таких, как Then, Else, Var, Const, Begin, никогда не ставится точка с запятой.

Можно также использовать и сокращенную (неполную) форму записи условного оператора. Эта форма используется тогда, когда в случае невыполнения условия ничего делать не надо.

Неполная форма условного оператора имеет следующий вид.

if <логическое выражение>

then <оператор>

Тогда если выражение, расположенное за служебным словом IF. в результате дает истину, выполняются действия после слова THEN, в противном случае эти действия пропускаются.

Упражнение 12. Составить программу, которая, если введенное число отрицательное меняет его на противоположное.
	Program Chisla; Var x: integer; {вводимое число} Begin write(‘Введите число‘); {вводим целое число} readln(x); if x<0 then x:=-x; writeln (x); End.

Домашние вопросы и задачи:

1. Какой алгоритм называется разветвляющимся, в чем его отличие от линейного?

2. Какой оператор используется для реализации разветвляющегося алгоритма, как записывается и работает этот оператор?

3. Какой оператор называется составным? В каких случаях составной оператор используется внутри условного оператора? Приведите примеры.

4. Расскажите по шагам, как работает программа о делении (см. выше). Укажите все возможные варианты прохождения этого алгоритма.

5. В каком случае используется неполная форма условного оператора? Как она записывается и работает? Приведите примеры.

Задачи:

№23. Каким будет значение переменной а после выполнения операторов:

if a<4 then

begin a:=a+2; a:=a+3;

end

else a:=a-1; а) при a=3, б) при a=4.

№24. Запишите условный оператор, в котором значение переменной с вычисляется по формуле a+b, если а – нечетное и a*b, если а – четное.

№25. Составьте программу и блок-схему вычисления значения функции:

у=