entier mot_clef entier $a id_variable $a , symbole VIRGULE entier mot_clef entier $b id_variable $b ; symbole POINT_VIRGULE pgcd id_fonction pgcd ( symbole PARENTHESE_OUVRANTE entier mot_clef entier $a id_variable $a , symbole VIRGULE entier mot_clef entier $b id_variable $b ) symbole PARENTHESE_FERMANTE entier mot_clef entier $c id_variable $c ; symbole POINT_VIRGULE { symbole ACCOLADE_OUVRANTE $c id_variable $c = symbole EGAL $a id_variable $a - symbole MOINS ( symbole PARENTHESE_OUVRANTE $a id_variable $a / symbole DIVISE $b id_variable $b ) symbole PARENTHESE_FERMANTE * symbole FOIS $b id_variable $b ; symbole POINT_VIRGULE si mot_clef si $c id_variable $c = symbole EGAL 0 nombre 0 alors mot_clef alors { symbole ACCOLADE_OUVRANTE retour mot_clef retour $b id_variable $b ; symbole POINT_VIRGULE } symbole ACCOLADE_FERMANTE sinon mot_clef sinon { symbole ACCOLADE_OUVRANTE retour mot_clef retour pgcd id_fonction pgcd ( symbole PARENTHESE_OUVRANTE $b id_variable $b , symbole VIRGULE $c id_variable $c ) symbole PARENTHESE_FERMANTE ; symbole POINT_VIRGULE } symbole ACCOLADE_FERMANTE } symbole ACCOLADE_FERMANTE main id_fonction main ( symbole PARENTHESE_OUVRANTE ) symbole PARENTHESE_FERMANTE { symbole ACCOLADE_OUVRANTE $a id_variable $a = symbole EGAL lire mot_clef lire ( symbole PARENTHESE_OUVRANTE ) symbole PARENTHESE_FERMANTE ; symbole POINT_VIRGULE $b id_variable $b = symbole EGAL lire mot_clef lire ( symbole PARENTHESE_OUVRANTE ) symbole PARENTHESE_FERMANTE ; symbole POINT_VIRGULE si mot_clef si $b id_variable $b < symbole INFERIEUR $a id_variable $a alors mot_clef alors { symbole ACCOLADE_OUVRANTE ecrire mot_clef ecrire ( symbole PARENTHESE_OUVRANTE pgcd id_fonction pgcd ( symbole PARENTHESE_OUVRANTE $a id_variable $a , symbole VIRGULE $b id_variable $b ) symbole PARENTHESE_FERMANTE ) symbole PARENTHESE_FERMANTE ; symbole POINT_VIRGULE } symbole ACCOLADE_FERMANTE sinon mot_clef sinon { symbole ACCOLADE_OUVRANTE ecrire mot_clef ecrire ( symbole PARENTHESE_OUVRANTE pgcd id_fonction pgcd ( symbole PARENTHESE_OUVRANTE $b id_variable $b , symbole VIRGULE $a id_variable $a ) symbole PARENTHESE_FERMANTE ) symbole PARENTHESE_FERMANTE ; symbole POINT_VIRGULE } symbole ACCOLADE_FERMANTE } symbole ACCOLADE_FERMANTE symbole FIN