En este programa hemos utilizado la dentro de la función "If" un "Begin y End", para la condicion que que si eres mayor de edad te ponga un texto en un color especifico y si no, otro texto con otro color.

Esquema

Begin

--If (variable) > o > o = X then

------Begin

------End.

--else

------Begin

------End.

End.