Алгоритми і програми з розгалуженнями, Детальна інформація

write ln (‘c=’, c); read ln

end.

J

L

Z

p

®

\x00BA

J

X

Z

p

®

<-яке значення х і обчислити значення функції у, яка задана формулою



program F1

var x,y: real;

begin

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

read ln (x);

if x>0 then y:=x+3 else y:=x-5;

write ln (‘y=’,y);

read ln

end.

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

Повне розгалуження реалізують за допомогою повної команди розгалуження if.

Виконання команди:

Якщо умова виконується (в блок-схемі – вітка “так”), то виконується команда 1 (або серія команд 1), якщо ні – то команда 2 (серія команд 2).

Зауваження. На місці команди 1 та команди 2 може бути теж команда розгалуження if.

Приклад. Визначимо більше число з-поміж двох чисел: