Программирование ветвлений на Паскале

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

Оператор ветвления в полном варианте
IF A>B THEN max:=A ELSE max:=B;
IF (условие) THEN (операторы) ELSE (операторы);

Оператор ветвления в неполном варианте
IF (условие) THEN (операторы);
IF A>B THEN B:=В*2;

Задача: даны два числа; выбрать большее из них.
Блок-схема
(полное ветвление)

Не полное ветвление
В

Задача: нахождение большего из трёх
алг БИТ
вещ А, В, С, D
нач ввод А, В, C
если A>B
то если А>C то D:=A иначе D:=C кв
иначе если B>C то D:=B иначе D:=С кв
кв
вывод D
кон
Program BIT;
var A, B, C, D: real;
begin readln (A, B, C);
if A>B
then if A>C then D:=A else D:=B
else if B>C then D:=B else D:=C;
writeln (D)
end.