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

Ветвление - такая форма организации действий, при которой в зависимости от выполнения некоторого условия совершается одна или другая последовательность действий

Тема урока:
«Многообразие способов записи ветвлений.
Составной оператор»

Цель урока:
Научиться записывать
программу на зыке Pascal
разветвляющихся алгоритмов
разными способами

Задачи:
Записывать программу при помощи
полной формы записи условного оператора
2. Записывать программу при помощи
сокращенной формы записи условного оператора
3. Записывать программу при помощи
Составного условного оператора

1
2
КОМАНДА ВЕТВЛЕНИЯ
ИМЕЕТ ПОЛНУЮ (1)
ИЛИ СОКРАЩЕННУЮ ФОРМУ(2)

IF <условие>
THEN <операторы>
ELSE <операторы>;
условие-записывается с помощью знаков сравнения
и принимает два значения: да или нет
IF A>B
THEN max:=A
ELSE max:=B;
Полная форма записи

Да
Нет
A > B ?
B:=B*2

Неполная форма записи
IF <условие>
THEN <операторы>;
IF A>B
THEN B:=B*2;

Запишите на языке программирования Pascal фрагмент блок – схемы

Запись составного оператора ветвления
If <условие>
Then
Begin
<оператор 1>;
<оператор 2>; ……………
<оператор n>;
End
Else
Begin
<оператор 1>;
<оператор 2>;
……………
<оператор n>;
End;

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

Program _1;
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);
end.
Результат

Результат