.:: Занятие IV ::.

Тема:

     Ветвление программы. Оператор условного перехода.

     Часто при решении задач возникает потребность в проверке условий. Для таких случаев существует оператор If-Then-Else.

Полный вид оператора:

If [условие] then [оператор1] else [оператор2];

или

If [условие] then begin
     [серия операторов1];
end
else begin
     [серия операторов1];
end;

     Условие - логическое выражение, которое состоит из логисеких операндов, связанных логическими операциями. Логическими операндами могут быть константы, переменные, функции. Операции отнтшения: >, <, >=, <=, <>, =. Логические операции: and, or, not.

     В первую очередь вычисляется условие, результат может быть True или False. Если результат True, то выполняется оператор1 (серия операторов1). Если False, то выполняется оператор2 (серия операторов2).

Задача.

     Вычислить значение функции y=1/x^1/2.

Замечание.

D(y): x>0.

program f;
uses crt
var x,y:real;
begin
     writeln('vvedite x');
     readln(x);
     if x>0 then
     begin
         y:=1/sqrt(x);
          writeln('y=',y:0:3);
     end
else
     wrietln('f neopr');
end;
readkey;
end.

Неполная форма оператора IF

     Неполная форма оператора If соответствует одной "ветви":

If [условие] then [оператор1];

или

If [условие] then begin
     [серия операторов];
end;

     Если значение выражения False, то осуществляется переход к следуюшему, после end;, оператору.

Логические операции

     В операторе If можно записать несколько условий, объединяя их логическими операциями

1. Логическое умножение "и", "and":
   if (усл.1) and (усл.2) and (усл.3) then [опер.1] else [опер.2];
   Если все условия True, то переход к операторам после Then.
   Если хотябы одно False, то переход к операторам после Else.
2. Логическое сложение "или", "or":
   if (усл.1) or (усл.2) or (усл.3) then [опер.1] else [опер.2];
   Если хотябы одно условие True, то переход к операторам после Then.
   Если все условия False, то переход к операторам после Else.

Задачи.

1. Вычислить значения функции y=x²-4x+5, при x<=1, и y=1/x³+4x-5, при x>1
2. С клавиатуры вводится 3 целых (integer) числа. Определить сколько среди них четных