Sentencia IF THEN ELSE

program edades;
uses
crt;
var
edad:string;
const=18;
begin
clrscr;
writeln('Escribe tu edad: ");
readln(edad);
if(edad > = 18)then
writeln('! Eres Mayor de edad!)
else
writeln('!eres menor de edad!');
readln;
end.

En este program se utilizan las sentencia IF THEN ELSE que son tilizadas en programas en los que solo tienes dos opciones ya se si o no, o mayor o menor que.

En el programa anterior se utliza para saber si eres mayor o menor de edad.