Алгоритми з розгалуженнями. Команда IF

арг дійсн х

рез дійсн y

поч ввести х

якщо х>0

то y:=x+3

інакше y:=x-5

все

PROGRAM F1;

Var x, y:real;

Begin

Writeln(‘Введіть х:’)

Readln (x);

If x>0 then y:=x+3

Else y:=x-5;

Wrieteln(‘y=’,y);

End.

Неповне розгалуження.

Неповне розгалуження є частковим випадком повного. Відповідну задачу формулюють так: виконати серію операторів, якщо справджується деяка умова

якщо умова

то серія команд

все

Блок схема повного розгалуження

У мові Паскаль неповний умовний оператор записують так:

IF <логічний вираз> then <команда>

Приклад 1. Квадратний корінь величини в з урахуванням умови існування обчислюють так: if в>=0 then d:=sgrt(в).