9 напишите структуру оператора ветвления

Pascal

Оператор ветвления (условный оператор) IF

If (условие) then

Блок, выполняющийся, если условие верно

else

Блок, выполняющийся если условие не верно

Сокращенная форма (else может отцутствовать)

if (условие) then

Блок, выполняющийся, если условие верно

Если условие одно то запись имеет вид

if a >b then ...

Если условий несколько, то они берутся в скобки

and (выполняются все) ; or (выполняется хоть одно)

1 - верно 0 - неверно

(1 and 1 = 1; 1 and 0 = 0)

(1 or 1 = 1; 1 or 0 = 1; 0 or 0 = 0)

if (a>b) and (a > 0) then

Если блок да/нет содержит несколько операторов, то они беруться в операторные скобки

if a > b then

writeln (a) / / 1)

if a > b then

begin

writeln (a) ; / / 1)

b : = a + b; / / 2)

end;

if a > b then

begin

writeln (a) ; / / 1)

b : = a + b; / / 2)

end

else

begin

writeln (b) ; / / 1)

a : = a + b; / / 2)

end;