Si R=0 ALORS ECRIRE (Y,'Est un ............................de', X) ; FINSI ; ECRIRE ('Fin Programme') ; FIN