Ejemplos de pascal