Type Octet=Entier Contrainte Objet Entre 0 Et 255;
Principal /*******/ Variable /******/ O : Octet; Debut ... O=0x10; /* O a pour valeur 16. */ ... Fin Principal