Реферат: Ветвление в Паскале

if x > 0 then

y:=sqrt(x

else

if x <= -3 then

y:=sqr(x)

else write ('Решений нет');

Краткая форма условного оператора

Части ELSE оператор2 может и не быть, тогда формат оператора:

If условие THEN оператор1;

Выполнение оператора:

Если условие истинно, то выполняется оператор после слова THEN, а иначе он пропускается.

Примеры:

if abs(x) >= 5 then

y:=exp(3*ln(x))

Составной оператор

В условном операторе после слов THEN и ELSE можно помещать по несколько операторов. В этом случае их надо объединить в СОСТАВНОЙ оператор, который начинается словом BEGIN и заканчивается словом END; (на конце не точка, а точка с запятой!)

Примеры

Составить программу, которая перераспределит заданные значения x, y так, что в х окажется большее значение, а в y - меньшее.

program PRMAX;

var x, y, z: real;

begin

write ('Введите два числа: ');

read (x, y);

if x < y then

begin z:=x;

x:=y;

y:=z

end;

writeln ('x =', x, 'y=', y);