entier $a POINT_VIRGULE procedure PARENTHESE_OUVRANTE PARENTHESE_FERMANTE ACCOLADE_OUVRANTE ecrire PARENTHESE_OUVRANTE 1 PARENTHESE_FERMANTE POINT_VIRGULE ACCOLADE_FERMANTE main PARENTHESE_OUVRANTE PARENTHESE_FERMANTE ACCOLADE_OUVRANTE procedure PARENTHESE_OUVRANTE PARENTHESE_FERMANTE POINT_VIRGULE ACCOLADE_FERMANTE