ОПЕРАТОРЫ ПОВТОРЕНИЯ

End;

Case C of

Условный оператор

С помощью условного оператора выбирается и выполняется один из операторов, входящих в его состав.

Условный оператор имеет два варианта записи.

Полная форма:

где if, then, else – зарезервированные слова (если, то, иначе).

Замечание: перед Else символ «;» никогда не ставится.

В зависимости от значения логического выражения (условия), выполняется или стоящий после Then оператор 1 (если условие истинно), или следующий за Else оператор 2 (когда условие ложно).

Неполная форма:

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

В качестве операторов используются любые простые или структурные операторы. Поскольку любой из операторов может быть в том числе и условным, то по принятому соглашению в языке Паскаль ключевое слово Else всегда относится к ближайшему ему ключевому слову If. Если после Thenили Else необходимо выполнить действия, описанные несколькими операторами, то эти операторы должны быть заключены в операторные скобки Begin – End(составной оператор).

Пример.Дана область на плоскости. Составить программу, которая выдает одно из сообщений «Да», «Нет», «На границе» в зависимости от того, лежит ли случайная точка с координатами внутри, вне или на границе данной области: . Program z1; var x, y: real; Begin Writeln ('Введите координаты точки (x, y):'); Readln (x, y); If sqr(x-2)+sqr(y)<10 Then writeln ('Да') Else If sqr(x-2)+sqr(y)>10 Then writeln ('Нет') Else writeln (‘На границе’); End.

5.4. Оператор выбора обеспечивает выбор одного из нескольких операторов. Общий вид записи оператора:

<константа1>:<оператор1>;

<константа2>:<оператор2>;

…

<константаN>:<операторN>

где С – выражение (селектор), операторы могут быть простыми или составными.

Выбор оператора (последовательности операторов) определяется значением выражения (селектора) С, которое располагается между ключевыми словами Case и of. Значение выражения должно совпадать с константами, стоящими перед операторами. Выражение С может принадлежать любому типу, кроме Real. Выбор оператора определяется совпадением значения селектора и константы, стоящей перед оператором. Например, для вычисления периметров прямоугольника, квадрата и длины окружности можно записать оператор:

…

writeln(‘Введите цифру, соответствующую фигуре:’);

writeln(‘1. прямоугольник’); writeln(‘2. квадрат’);

writeln(‘3. окружность’); readln(n);

Case n of

1: begin

writeln(‘Введите стороны a,b’);readln(a,b);

P:=2.0*(a+b);

end;

2: begin

writeln(‘Введите сторону a’);readln(a);

P:=4.0*a;

end;

3: begin

writeln(‘Введите радиус r’);readln(r);

P:=2.0*pi*r;

end;

End;

Writeln(‘Периметр или длина окружности равна’, P)

End.

Различают операторы повторения языка Turbo Pascal трех управляющих конструкций: цикл с предусловием (while), цикл с постусловием (repeat) и цикл со счетчиком (for).