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

Y = Y + 0.5

End

ELSE

IF NOT (((X >= 0.5) AND (X <= 2))

OR ((Y >= 0.5) AND (Y <= 2)))

THEN

Begin

X = X / 10;

Y = Y / 10

End;

WriteLn('Результат:'); WriteLn('X= ', X:10:6); WriteLn('Y= ', Y:10:6)

END.

Задача 2. Дано действительное число a. Вычислить f(a), если

Program Usl1;

Var A, F : Real;

Begin

WriteLn('Введите действительное число: '); ReadLn(A);

IF A <= 0 THEN

F = 0

ELSE

IF A <= 1 THEN

F = Sqr(A) - A

ELSE

F = Sqr(A) - SIN(Pi * Sqr(A));

WriteLn('Значение функции F(x) при x = ', A:10:6, ' равно ', F:10:6);

END.

Кроме условного оператора в качестве управляющей структуры довольно часто используется оператор выбора CASE. Эта структура позволяет переходить на одну из ветвей в зависимости от значения заданного выражения (селектора выбора). Ее особенность состоит в том, что выбор решения здесь осуществляется не в зависимости от истинности или ложности условия, а является вычислимым. Оператор выбора позволяет заменить несколько операторов развилки (в силу этого его ещё называют оператором множественного ветвления).

В конструкции CASE вычисляется выражение K и выбирается ветвь, значение метки которой совпадает со значением K. После выполнения выбранной ветви происходит выход из конструкции CASE. Если в последовательности нет метки со значением, равным K, то управление передается внешнему оператору, следующему за конструкцией CASE (в случае отсутствия альтернативы ELSE; если она есть, то выполняется следующий за ней оператор, а уже затем управление передается внешнему оператору).

Запись оператора выбора