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

Pascal

Оператор ветвления (условный оператор) IF
 
 If (условие) then
  Блок, выполняющийся, если условие верно
 else
 Блок, выполняющийся если условие не правильно

Сокращенная форма (else может отцутствовать)
if (условие) then
 Блок, выполняющийся, если условие правильно

Если условие одно то запись имеет вид
 if a gt;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 (agt;b) and (a gt; 0) then

Если блок да/нет содержит несколько операторов, то они беруться в операторные скобки
 if a gt; b then
  writeln (a)    // 1)
 
if a gt; b then
 begin
  writeln (a); // 1)
  b := a + b; // 2)
 end;

if a gt; b then
 begin
  writeln (a); // 1)
  b := a + b; // 2)
 end
else
 begin
  writeln (b); //1)
  a := a + b; //2)
 end;