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