Logikai műveletek Pascalban: Az and művelet