Как выполняется команда ветвления в полной форме? В сокращенной форме?

Если речь идет о pascal, то: if <условие> then <если выполнено> end; if <условие> then <если выполнено> else <если нет> end; Напримерreadln (x); if x=5 thenwriteln ('угадал число') elsewriteln ('нет, ответ 5'); readln (x); if x=1 then writeln ('да, 1'); writeln ('blablabla');