Detalles:
(* Ejemplo básico de "if" *)
if x > 0 then
WriteLn('x es positivo');
(* Ejemplo avanzado de "if", analizando línea de comandos *)
if ParamCount <> 2 then
begin
WriteLn('Faltan parámetros');
Halt(1);
end
else
begin
LeerFichero( ParamStr(1) );
CrearFichero( ParamStr(2) );
end;