Основные сведения. Алгоритм называется разветвляющимся, если он содержит несколько ветвей, отличающихся друг от друга содержанием вычислений

Алгоритм называется разветвляющимся, если он содержит несколько ветвей, отличающихся друг от друга содержанием вычислений. Выход вычислительного процесса на ту или иную ветвь алгоритма определяется исходными данными задачи.

Перед выполнением работы необходимо ознакомиться с правилами записи логических выражений, операций сравнения, операторов IF, CASE.

УСЛОВНЫЙ ОПЕРАТОР IF

Условный оператор IF обеспечивает выполнение или невыполнение некоторого оператора в зависимости от заданных условий. Формат оператора IF:

ЕСЛИ < условие=ИСТИНА> ТО ВЫПОЛНИТЬ < оператор1>

ИНАЧЕ ВЫПОЛНИТЬ < оператор2>;

То же на языке Паскаль:

IF < условие=ИСТИНА> THEN < оператор1>

ELSE < оператор2>;

Обратите внимание: перед ELSE точка с запятой не ставится!!!

Пример:

IF Temp > 100 THEN Writeln('Вызывайте пожарных! ');

ELSE Writeln('Все в порядке.');

В операторе IF вторая часть может отсутствовать:

IF < условие = ИСТИНА> THEN < оператор1>;

В этом случае, если условие ложно, оператор IF игнорируется и выполняется следующий за IF оператор.

Оператор IF используется в тех случаях, когда имеется два варианта действий в зависимости от какого-то условия.

ОПЕРАТОР ВЫБОРА CASE

Если надо выбрать более чем из двух альтернатив, используют оператор CASE. Он имеет следующий формат:

СASE < селектор> OF

< значение селектора>: < оператор1>;

< значение селектора>: < оператор2>;

...

< значение селектора>: < операторN>

ELSE < оператор>

END;

В качестве селектора могут служить переменные символьного и целочисленных типов. Данные типа real и string для селектора строго запрещены.

В зависимости от значения селектора выполняется соответствующий этому значению оператор.

Значения селектора могут быть заданы тремя способами:

перечислением: ~ 1, 3, 5, 7

диапазоном: ~ 'a'.. 'z'

перечислением+диапазоном: ~ 1..5, 7, 9, 11, 21..31

Оператор CASE чрезвычайно удобен и часто используется программистами.

Примеры его использования на все случаи жизни:

CASE c селектором типа integer: CASE с селектором типа char

X: =2; Ch: ='f';

CASE X OF CASE Ch OF

1, 3, 5: Write('Нечетное число'); '+', '-', '+', '*': Write('Операция');

2, 4, 6: Write('Четное число'); 'a'..'я', 'a'..'z': Write('с.Буква');

7..20: Write('Диапазон 7-20'); 'А'..'Я', 'A'..'Z': Write('п.Буква');

ELSE: Write('Вне диапазона 1..20') ELSE: Write('Не операция, не буква');

END; END;

Результат: Четное число Результат: с.Буква

Все другие операторы CASE строятся в полной аналогии с представленными.

Str: ='Start'; ОШИБКА: в качестве селектора

CASE Str OF задана строка!!!

'Start': writeln('Старт системы! ');

'Stop': writeln('Остановить работу! ');

END;

ПРИМЕР 1: Найти максимальную из двух величин а и в