entier $a; main() { si 1 alors {ecrire(1); } }