Иногда сокращенной формы ветвления недостаточно, т.к. необходимо выполнить одну команду/команды если условие истинно, и совсем другую команду/команды, если оно ложно. Простейшим примером может служить квадратное уравнение: если дискриминант больше или равен нулю - мы вычисляем корни уравнения. Если же дискриминант меньше нуля - никаких вычислений производить не нужно, нужно просто сказать "корней нет".
Для таких случаев и нужна полная форма ветвления.

Ветвление. Полная форма

В полную форму ветвление входит слово "else", что значит "иначе". Это слово отделяет команды, которые выполняются при истинности условия от команд, которые выполняются при ложности условия. Синтаксис полной формы ветвления таков:

if условие then
Команда a₁
Команда a₂
...
Команда a_n
else
Команда b₁
Команда b₂
...
Команда b₁
End if

Примечание: Команды а₁-а_n, будут выполняться в случае, если указанное условие будет истинным. Если же условие будет ложным, будут выполняться команды b₁-b_n.

Пример 1:

Пользователь вводит в программу число. Если это число 5 - программа удваивает его и выводит результат на экран. Если же число не равно 5 - программа делит его на 2 и выводит результат на экран
Dim Z as Double
Input Z
If Z=5 then Z=Z*2
else
Z=Z/2
print a

Разберем пример более подробно:

Dim Z as Double
Этой командой мы объявляем переменную Z. Данная переменная будет принимать числовые значения
Input Z
Эта команда записывает в переменную Z число, введенное пользователем с клавиатуры
If Z=5 then
Обязательно перейти на следующую строчку, чтобы компьютер не принял запись за сокращенную форму.
Z=Z*2
Если значение переменной Z (т.е. введенное пользователем число) равно 5 - выполняется команда Z=Z*2, т.е. значение переменной Z удваивается
else
Слово "Иначе". Отделяет команды, выполняющиеся при истинности условия от команд, выполняющихся при ложности условия. И тут тоже обязательно перейти на следующую строчку.
Z=Z/2
Команда "Z=Z/2" выполнится только в том случае, если введенное условие "Z=5" будет ложно
end if
"Конец если". Стандартное завершение ветвления.
print Z
Вывод значения переменной Z на экран.

Задание 1. Написать программу, которая попросит пользователя ввести два числа, сравнит их, и выдаст сообщение типа "первое число больше второго" или "второе число больше первого"

Задание 2. Написать программу, которая спросит имя пользователя. Если введенное имя - "Вася", программа должна выдать сообщение "Привет, Вася", иначе - сообщение "ты не мой хозяин"

Вложенные ветвления

Рассмотрим задачу: Написать программу, определяющую количество корней квадратного уравнения.
С виду эта задача не выглядит чем-то серьезным. Известно, что кол-во корней такого уравнения зависит от значения дискриминанта. Вычислим его:
Dim a as Double
Dim b as Double
Dim c as Double
Dim d as Double
Объявляем 4 переменные: а,b,с - исходные коэффициенты квадратного уравнения, d - для хранения значения дискриминанта
Input a,b,c
Вводим коэффициенты
d=b^2-4*a*c
Вычисляем значение дискриминанта, и... и вот тут нас поджидает засада, т.к. конструкция "if...then...else" позволяет нам описать лишь два взаимоисключающих варианта, а у нас их целых три: d>0; d=0; d<0.
Что же делать? Вложить одно ветвление внутрь другого:
if d>0 then
Первый вариант развития событий - дискриминант, больший нуля.
Print "Это уравнение имеет два корня"
В случае, если условие "d>0" выполнится, компьютер выведет на экран сообщение "Это уравнение имеет два корня"
else
этот оператор отделяет команды, которые выполнятся при d>0 от команд, которые будут выполняться во всех остальных случаях. Один вариант развития событий мы разобрали, осталось еще два:
if d=0 then
Второй вариант развития событий - дискриминант, равный нулю.
Print "Это уравнение имеет один корень"
В случае, если условие "d=0" выполнится, компьютер выведет на экран сообщение "Это уравнение имеет один корень"
else
этот оператор отделяет команды, которые выполнятся при d=0 от команд, которые будут выполняться во всех остальных случаях. Таким образом, нами уже описаны действия программы при двух вариантах развития событий: при d>0 и при d=0. Если же оба эти варианта не выполнятся, нам останется признать, что заданное уравнение корней не имеет:
Print "Это уравнение не имеет корней"
В случае, если ни условие "d>0", ни условие "d=0" не выполнятся, компьютер выведет на экран сообщение "Это уравнение не имеет корней"
end if
Закроем последнее ветвление.
end if
Закроем первое ветвление

Это важно: Каждое ветвление необходимо закрыть. Закрываются они в порядке, обратном открытию (т.е. сначала закрывается последнее ветвление, затем предпоследнее, и так далее).
Таким образом, команд "end if" в программе должно быть ровно столько же, сколько команд "if" исключая использование сокращенной формы ветвления.

Задание 1. Написать программу, выдающую рекомендации по длине пароля: Пользователь вводит в программу пароль. Если в нем более 20 символов - программа выдает сообщение "Пароль слишком длинный". Если в нем менее 4 символов - сообщение "Пароль слишком короткий". Во всех остальных случаях - сообщение "Длина пароля оптимальна"

Задание 2. Лера занимается танцами, Тимур - боевыми искусствами, Илья - велоспортом, Сергей - киберспортом. Написать программу, которая сообщит хобби человека, чье имя в нее введут. Если же в программу введут любое имя кроме перечисленных, она должна сообщить "не знаю такого".